diff options
author | Lockywolf <lockywolf@gmail.com> | 2019-10-23 12:24:05 +0800 |
---|---|---|
committer | Lockywolf <lockywolf@gmail.com> | 2019-10-23 12:24:05 +0800 |
commit | 2eece6cdf4a1da62f11709cb5dd07e3fa9669092 (patch) | |
tree | af6abe3f73c50eef75048625ab920bfefd641b09 | |
parent | 94167d94889164deeddf5d5f3a99768fedbbc526 (diff) | |
parent | 03a0583875bd3ad56a12dec296002e99b073ca75 (diff) | |
download | geiser-2eece6cdf4a1da62f11709cb5dd07e3fa9669092.tar.gz geiser-2eece6cdf4a1da62f11709cb5dd07e3fa9669092.tar.bz2 |
Merge branch 'master' into ChibiExperiments
-rw-r--r-- | elisp/geiser-doc.el | 9 | ||||
-rw-r--r-- | elisp/geiser-log.el | 3 |
2 files changed, 8 insertions, 4 deletions
diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el index 7810957..a982997 100644 --- a/elisp/geiser-doc.el +++ b/elisp/geiser-doc.el @@ -382,6 +382,11 @@ With prefix argument, ask for symbol (with completion)." "Symbol: " (geiser--symbol-at-point))))) (when symbol (geiser-doc-symbol symbol)))) +(defun geiser-doc-manual-for-symbol (symbol) + (geiser-doc--external-help geiser-impl--implementation + symbol + (geiser-eval--get-module))) + (defun geiser-doc-look-up-manual (&optional arg) "Look up manual for symbol at point. With prefix argument, ask for the lookup symbol (with completion)." @@ -390,9 +395,7 @@ With prefix argument, ask for the lookup symbol (with completion)." (error "No manual available")) (let ((symbol (or (and (not arg) (geiser--symbol-at-point)) (geiser-completion--read-symbol "Symbol: ")))) - (geiser-doc--external-help geiser-impl--implementation - symbol - (geiser-eval--get-module)))) + (geiser-doc-manual-for-symbol symbol))) (defconst geiser-doc--sections '(("Procedures:" "procs") ("Syntax:" "syntax") diff --git a/elisp/geiser-log.el b/elisp/geiser-log.el index 91ed639..7b4193e 100644 --- a/elisp/geiser-log.el +++ b/elisp/geiser-log.el @@ -1,6 +1,6 @@ ;; geiser-log.el -- logging utilities -;; Copyright (C) 2009, 2010, 2012 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2012, 2019 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 @@ -14,6 +14,7 @@ ;; Some utilities for maintaining a simple log buffer, mainly for ;; debugging purposes. +(require 'geiser-custom) (require 'geiser-popup) (require 'geiser-base) |