emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] master 1fd0073: (eww): Don't interpret "org/foo" as an URL


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master 1fd0073: (eww): Don't interpret "org/foo" as an URL.
Date: Sat, 10 Jan 2015 15:41:58 +0000

branch: master
commit 1fd00738641f54cef63a4bdc389e8eaf94643577
Author: Lars Magne Ingebrigtsen <address@hidden>
Commit: Lars Magne Ingebrigtsen <address@hidden>

    (eww): Don't interpret "org/foo" as an URL.
---
 lisp/ChangeLog  |    1 +
 lisp/net/eww.el |    2 +-
 2 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9bfcd50..ac0701f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,7 @@
        as plain URLs, even if they have spaces in them (bug#19556).
        (eww): Also interpret things like "en.wikipedia.org/wiki/Free
        software" as an URL.
+       (eww): Don't interpret "org/foo" as an URL.
 
 2015-01-10  Daniel Colascione  <address@hidden>
 
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index 8278e3c..46b0760 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -258,7 +258,7 @@ word(s) will be searched for via `eww-search-prefix'."
          (if (or (string-match "\\`https?:" url)
                 ;; Also try to match "naked" URLs like
                 ;; en.wikipedia.org/wiki/Free software
-                (string-match "\\`[a-z._]+/" url)
+                (string-match "\\`[A-Za-z_]+\\.[A-Za-z._]+/" url)
                 (and (= (length (split-string url)) 1)
                      (or (and (not (string-match-p "\\`[\"\'].*[\"\']\\'" url))
                               (> (length (split-string url "[.:]")) 1))



reply via email to

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