emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] trunk r113160: * net/eww.el (eww): Start of strings is \\`


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] trunk r113160: * net/eww.el (eww): Start of strings is \\`, not ^.
Date: Mon, 24 Jun 2013 17:42:25 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 113160
revision-id: address@hidden
parent: address@hidden
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Mon 2013-06-24 19:42:22 +0200
message:
  * net/eww.el (eww): Start of strings is \\`, not ^.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/net/eww.el                eww.el-20130610114603-80ap3gwnw4x4m5ix-1
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-06-24 17:41:26 +0000
+++ b/lisp/ChangeLog    2013-06-24 17:42:22 +0000
@@ -1,3 +1,7 @@
+2013-06-24  Lars Magne Ingebrigtsen  <address@hidden>
+
+       * net/eww.el (eww): Start of strings is \\`, not ^.
+
 2013-06-24  Ivan Kanis  <address@hidden>
 
        * net/shr.el (shr-browse-url): Fix interactive spec.

=== modified file 'lisp/net/eww.el'
--- a/lisp/net/eww.el   2013-06-24 17:38:51 +0000
+++ b/lisp/net/eww.el   2013-06-24 17:42:22 +0000
@@ -108,7 +108,7 @@
         ;; 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)))


reply via email to

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