summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenjiro NAKAYAMA <nakayamakenjiro@gmail.com>2014-01-05 10:25:05 +0100
committerLars Magne Ingebrigtsen <larsi@gnus.org>2014-01-05 10:25:05 +0100
commitf4018140ec4bd45e88f9a8848ccae9d1db2260e2 (patch)
tree3bd470246b3ca7d019ed474937d4c471ef2782ea
parent73dbf960bfdb3a4e9a34804eefecdd76fd769f0c (diff)
downloademacs-f4018140ec4bd45e88f9a8848ccae9d1db2260e2.tar.gz
* net/eww.el (eww): Support single/double quote for search.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/net/eww.el5
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d68d7ea88c2..343b225c029 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2014-01-05 Kenjiro NAKAYAMA <nakayamakenjiro@gmail.com>
+
+ * net/eww.el (eww): Support single/double quote for search.
+
2014-01-05 Paul Eggert <eggert@cs.ucla.edu>
Fix misspelling of 'chinese' in rx (Bug#16237).
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index cb34a741248..fdd9982ff57 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -157,8 +157,9 @@ word(s) will be searched for via `eww-search-prefix'."
(user-error "FTP is not supported."))
(t
(if (and (= (length (split-string url)) 1)
- (or (> (length (split-string url "\\.")) 1)
- (string-match eww-local-regex url)))
+ (or (and (not (string-match-p "\\`[\"\'].*[\"\']\\'" url))
+ (> (length (split-string url "\\.")) 1))
+ (string-match eww-local-regex url)))
(progn
(unless (string-match-p "\\`[a-zA-Z][-a-zA-Z0-9+.]*://" url)
(setq url (concat "http://" url)))