Fixed indenting of history page headers.
authorplugd <plugd@thelambdalab.xyz>
Wed, 28 Jul 2021 11:17:57 +0000 (13:17 +0200)
committerplugd <plugd@thelambdalab.xyz>
Wed, 28 Jul 2021 11:17:57 +0000 (13:17 +0200)
elpher.el

index 7577489..1c42937 100644 (file)
--- a/elpher.el
+++ b/elpher.el
@@ -1757,7 +1757,7 @@ This is rendered using `elpher-get-visited-pages-page' via `elpher-type-map'."
 
 (defun elpher-display-history-links (pages title)
   "Show all PAGES in an Elpher buffer with a given TITLE."
-  (let* ((title-line (concat "---- " title " ----"))
+  (let* ((title-line (concat " ---- " title " ----"))
          (footer-line (make-string (length title-line) ?-)))
     (elpher-with-clean-buffer
      (insert title-line "\n\n")
@@ -1768,7 +1768,7 @@ This is rendered using `elpher-get-visited-pages-page' via `elpher-type-map'."
                   (address (elpher-page-address page)))
                (elpher-insert-index-record display-string address))))
        (insert "No history items found.\n"))
-     (insert "\n" footer-line "\n"
+     (insert "\n " footer-line "\n"
              "Select an entry or press 'u' to return to the previous page.")
      (elpher-restore-pos))))