summaryrefslogtreecommitdiff
path: root/elisp/geiser-doc.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2016-06-13 01:37:09 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2016-06-13 01:37:23 +0200
commit3e428e623bf8355eaf86960077df5adba8b39237 (patch)
treed9684b2de145c811a13b063958695d7f09fe553a /elisp/geiser-doc.el
parent368d12c1637be2cd66e0084524cae9945dcec18d (diff)
downloadgeiser-guile-3e428e623bf8355eaf86960077df5adba8b39237.tar.gz
geiser-guile-3e428e623bf8355eaf86960077df5adba8b39237.tar.bz2
A few byte-compilation warnings silenced
Diffstat (limited to 'elisp/geiser-doc.el')
-rw-r--r--elisp/geiser-doc.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index 1e4d218..414a358 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -1,6 +1,6 @@
;;; geiser-doc.el -- accessing scheme-provided documentation
-;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -72,7 +72,7 @@ help (e.g. browse an HTML page) implementing this method.")
(ring-ref (cadr geiser-doc--history) 0))
(defsubst geiser-doc--history-next-link ()
- (ring-ref (caddr geiser-doc--history) 0))
+ (ring-ref (car (cddr geiser-doc--history)) 0))
(defun geiser-doc--history-push (link)
(unless (or (null link) (equal link (geiser-doc--history-current)))