X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=blobdiff_plain;f=elpher.el;h=b9c43f87183cab7affca96b4ea238d0ed7696d7c;hp=ccba71639b54767e688450c2cf54754065f8f09b;hb=766a56746d122a9a35d5ac76830acb3123134c70;hpb=bc4fbb5c3361454f9d18e03960c1febcbdcf0b9b

diff --git a/elpher.el b/elpher.el
index ccba716..b9c43f8 100644
--- a/elpher.el
+++ b/elpher.el
@@ -577,13 +577,14 @@ previously-visited pages,unless NO-HISTORY is non-nil."
   "If `elpher-use-header' is true, display current page info in window header."
   (if elpher-use-header
       (let* ((display-string (elpher-page-display-string elpher-current-page))
+             (sanitized-display-string (replace-regexp-in-string "%" "%%" display-string))
              (address (elpher-page-address elpher-current-page))
              (tls-string (if (and (not (elpher-address-about-p address))
                                   (member (elpher-address-protocol address)
                                           '("gophers" "gemini")))
                              " [TLS encryption]"
                            ""))
-             (header (concat display-string
+             (header (concat sanitized-display-string
                              (propertize tls-string 'face 'bold))))
         (setq header-line-format header))))