summaryrefslogtreecommitdiff
path: root/elisp/geiser-doc.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-doc.el')
-rw-r--r--elisp/geiser-doc.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index 3778770..7462c4a 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -44,12 +44,15 @@
;;; Documentation browser history:
(defvar geiser-doc-history-size 50)
+(defvar geiser-doc--history nil)
(defun geiser-doc--make-history ()
(list nil ; current
(make-ring geiser-doc-history-size) ; previous
(make-ring geiser-doc-history-size))) ; next
+(setq geiser-doc--history (geiser-doc--make-history))
+
(defsubst geiser-doc--history-current ()
(car geiser-doc--history))
@@ -82,9 +85,6 @@
(ring-insert (nth 2 geiser-doc--history) (car geiser-doc--history)))
(setcar geiser-doc--history (ring-remove (nth 1 geiser-doc--history) 0))))
-(defvar geiser-doc--history nil)
-(setq geiser-doc--history (geiser-doc--make-history))
-
;;; Links