diff options
| author | Jan Nieuwenhuizen <janneke@gnu.org> | 2017-10-10 21:43:59 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2017-10-11 01:10:49 +0200 |
| commit | be00e7a8f7d2b716627eaf03837b5c1c83232a9d (patch) | |
| tree | a67b9b0d6022f793324a75e32f9375a229dcdbcb | |
| parent | 60c7b015e7ae0a3d59553264cce717bbc7a996f6 (diff) | |
| download | geiser-guile-be00e7a8f7d2b716627eaf03837b5c1c83232a9d.tar.gz geiser-guile-be00e7a8f7d2b716627eaf03837b5c1c83232a9d.tar.bz2 | |
guile: fix manual symbol lookup.
* elisp/geiser-guile.el (guile--manual-look-up): Change parameters for
info-lookup-symbol to string and 'scheme-mode. Fixes lookup.
| -rw-r--r-- | elisp/geiser-guile.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-guile.el b/elisp/geiser-guile.el index 5dd0c54..6b39435 100644 --- a/elisp/geiser-guile.el +++ b/elisp/geiser-guile.el @@ -1,6 +1,7 @@ ;; geiser-guile.el -- guile's implementation of the geiser protocols ;; Copyright (C) 2009-2017 Jose Antonio Ortega Ruiz +;; Copyright (C) 2017 Jan Nieuwenhuizen <janneke@gnu.org> ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the Modified BSD License. You should @@ -401,12 +402,11 @@ it spawn a server thread." (defun guile--manual-look-up (id mod) (let ((info-lookup-other-window-flag geiser-guile-manual-lookup-other-window-p)) - (info-lookup-symbol id 'geiser-guile-mode)) + (info-lookup-symbol (symbol-name id) 'scheme-mode)) (when geiser-guile-manual-lookup-other-window-p (switch-to-buffer-other-window "*info*")) (search-forward (format "%s" id) nil t)) - ;;; Implementation definition: |