Basic POP history to bookmarks page.

diff --git a/elpher.el b/elpher.el
index f2a8188..0fef0ac 100644 (file)
--- a/elpher.el
+++ b/elpher.el
@@ -1553,6 +1553,7 @@ The result is rendered using RENDERER."
             'face 'shadow))
    (elpher-restore-pos)))
 
+
 ;; Bookmarks page page retrieval
 
 (defun elpher-get-bookmarks-page (renderer)
@@ -1586,6 +1587,13 @@ The result is rendered using RENDERER."
                          'follow-link t
                          'help-echo help-string))
    (insert "\n")
+   (insert "\n--- Recently visited ---\n\n")
+   (maphash (lambda (address _)
+              (unless (elpher-address-special-p address)
+                (elpher-insert-index-record (elpher-address-to-url address)
+                                            address)))
+            elpher-content-cache)
+   (insert "\n------------------------\n")
    (elpher-restore-pos)))