emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Emacs-diffs] emacs-25 24a5f57: * lisp/net/eww.el (eww-tag-meta): Ha


From: Stefan Monnier
Subject: Re: [Emacs-diffs] emacs-25 24a5f57: * lisp/net/eww.el (eww-tag-meta): Handle single quoted URLs (Bug#25445).
Date: Sun, 15 Jan 2017 23:49:56 -0500
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/25.1.50 (gnu/linux)

>        (when (or (string-match "^\\([0-9]+\\) *;.*url=\"\\([^\"]+\\)\"" 
> refresh)
> +                (string-match "^\\([0-9]+\\) *;.*url='\\([^']+\\)'" refresh)
>                  (string-match "^\\([0-9]+\\) *;.*url=\\([^ ]+\\)" refresh))

BTW, this can be consolidated into

      (string-match (eval-when-compile
                     (concat "^\\([0-9]+\\) *;.*url="
                             "\\(?:\"\\(?2:[^\"]+\\)\""
                             "\\|'\\(?2:[^']+\\)'"
                             "\\|\\(?2:[^ ]+\\)"
                             "\\)"))
                    refresh)

-- Stefan



reply via email to

[Prev in Thread] Current Thread [Next in Thread]