summaryrefslogtreecommitdiff
path: root/elisp/geiser-doc.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-25 23:25:20 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-25 23:25:20 +0100
commit68146cf214ef1e58f1805281a946a8c8f0d8a436 (patch)
tree459dac892400501742d455d7fc0fdd73d1b40c56 /elisp/geiser-doc.el
parent544b9dfb82dcf81847d34a6c2d141f2020fe3198 (diff)
downloadgeiser-68146cf214ef1e58f1805281a946a8c8f0d8a436.tar.gz
geiser-68146cf214ef1e58f1805281a946a8c8f0d8a436.tar.bz2
Bug fix: unbreaking the doc browser
Diffstat (limited to 'elisp/geiser-doc.el')
-rw-r--r--elisp/geiser-doc.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index 5abcd3c..b6a19e9 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -217,10 +217,9 @@ help (e.g. browse an HTML page) implementing this method.")
(geiser-impl--method 'external-help geiser-impl--implementation))
(defun geiser-doc--module (&optional mod impl)
- (let* ((impl (or (geiser-doc--link-impl geiser-doc--buffer-link)))
- (method (geiser-impl--method 'find-module impl))
- (mod (or mod (geiser-doc--link-module geiser-doc--buffer-link))))
- (funcall method mod)))
+ (let ((impl (or impl (geiser-doc--link-impl geiser-doc--buffer-link)))
+ (mod (or mod (geiser-doc--link-module geiser-doc--buffer-link))))
+ (geiser-impl--call-method 'find-module impl mod)))
(defun geiser-doc--insert-title (title)
(let ((p (point)))