diff options
| author | Lars Magne Ingebrigtsen | 2013-06-24 19:42:22 +0200 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 2013-06-24 19:42:22 +0200 |
| commit | be549ce6f936993ef4e4069a529ad3daadc5d966 (patch) | |
| tree | c1700b6844d4a684108bc06a18ca6f0d3dfbc54a | |
| parent | 5196f88a9548578c911463804460cb9fa5ddfca5 (diff) | |
| download | emacs-be549ce6f936993ef4e4069a529ad3daadc5d966.tar.gz emacs-be549ce6f936993ef4e4069a529ad3daadc5d966.zip | |
* net/eww.el (eww): Start of strings is \\`, not ^.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/net/eww.el | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 97b3fcbc4f1..60c1174f06d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2013-06-24 Lars Magne Ingebrigtsen <larsi@gnus.org> | ||
| 2 | |||
| 3 | * net/eww.el (eww): Start of strings is \\`, not ^. | ||
| 4 | |||
| 1 | 2013-06-24 Ivan Kanis <ivan@kanis.fr> | 5 | 2013-06-24 Ivan Kanis <ivan@kanis.fr> |
| 2 | 6 | ||
| 3 | * net/shr.el (shr-browse-url): Fix interactive spec. | 7 | * net/shr.el (shr-browse-url): Fix interactive spec. |
diff --git a/lisp/net/eww.el b/lisp/net/eww.el index 7b37eda185e..d573f095bbd 100644 --- a/lisp/net/eww.el +++ b/lisp/net/eww.el | |||
| @@ -108,7 +108,7 @@ word(s) will be searched for via `eww-search-prefix'." | |||
| 108 | ;; some site don't redirect final / | 108 | ;; some site don't redirect final / |
| 109 | (when (string= (url-filename (url-generic-parse-url url)) "") | 109 | (when (string= (url-filename (url-generic-parse-url url)) "") |
| 110 | (setq url (concat url "/")))) | 110 | (setq url (concat url "/")))) |
| 111 | (unless (string-match-p "^file:" url) | 111 | (unless (string-match-p "\\'file:" url) |
| 112 | (setq url (concat eww-search-prefix | 112 | (setq url (concat eww-search-prefix |
| 113 | (replace-regexp-in-string " " "+" url))))) | 113 | (replace-regexp-in-string " " "+" url))))) |
| 114 | (url-retrieve url 'eww-render (list url))) | 114 | (url-retrieve url 'eww-render (list url))) |