aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/net
diff options
context:
space:
mode:
authorLars Magne Ingebrigtsen2013-06-21 07:52:47 +0000
committerKatsumi Yamaoka2013-06-21 07:52:47 +0000
commitd80a808f8d49b1563df7eabda86e387af0787c77 (patch)
treeb805a15603232cf0a41e4b8603efb95a53d31faa /lisp/net
parent7f8e3b22a56744031ea1c6f90dfa4eb93e6b8053 (diff)
downloademacs-d80a808f8d49b1563df7eabda86e387af0787c77.tar.gz
emacs-d80a808f8d49b1563df7eabda86e387af0787c77.zip
lisp/net/eww.el (eww-update-header-line-format): Quote % characters
Diffstat (limited to 'lisp/net')
-rw-r--r--lisp/net/eww.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/net/eww.el b/lisp/net/eww.el
index b09d8732afb..ad19758b4a6 100644
--- a/lisp/net/eww.el
+++ b/lisp/net/eww.el
@@ -230,9 +230,12 @@
230 230
231(defun eww-update-header-line-format () 231(defun eww-update-header-line-format ()
232 (if eww-header-line-format 232 (if eww-header-line-format
233 (setq header-line-format (format-spec eww-header-line-format 233 (setq header-line-format
234 `((?u . ,eww-current-url) 234 (replace-regexp-in-string
235 (?t . ,eww-current-title)))) 235 "%" "%%"
236 (format-spec eww-header-line-format
237 `((?u . ,eww-current-url)
238 (?t . ,eww-current-title)))))
236 (setq header-line-format nil))) 239 (setq header-line-format nil)))
237 240
238(defun eww-tag-title (cont) 241(defun eww-tag-title (cont)