* net/eww.el (eww): Start of strings is \\`, not ^.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 97b3fcbc4f1e763b5b58098680417218a86a948c..60c1174f06d23f9533dcfc2aa164423ec1c5a736 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2013-06-24  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * net/eww.el (eww): Start of strings is \\`, not ^.
+
 2013-06-24  Ivan Kanis  <ivan@kanis.fr>
 
        * net/shr.el (shr-browse-url): Fix interactive spec.

diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 7b37eda185e79baf4b24b2a90341663f64a400bc..d573f095bbda8c5a73fc10cc1e0bed0e959f8aab 100644 (file)
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -108,7 +108,7 @@ word(s) will be searched for via `eww-search-prefix'."
         ;; some site don't redirect final /
         (when (string= (url-filename (url-generic-parse-url url)) "")
           (setq url (concat url "/"))))
-    (unless (string-match-p "^file:" url)
+    (unless (string-match-p "\\'file:" url)
       (setq url (concat eww-search-prefix
                         (replace-regexp-in-string " " "+" url)))))
   (url-retrieve url 'eww-render (list url)))