diff options
| author | Dan Leslie <dan@ironoxide.ca> | 2015-10-03 21:33:21 -0700 |
|---|---|---|
| committer | Dan Leslie <dan@ironoxide.ca> | 2015-10-03 21:33:21 -0700 |
| commit | 373b9a499dd4f26886c0e54612e638dd529bcc6f (patch) | |
| tree | e6842bc0584687646319b79b89c0f55499840bf8 | |
| parent | 466df84526032315d119b48f95d9e70ab707133e (diff) | |
| download | geiser-guile-373b9a499dd4f26886c0e54612e638dd529bcc6f.tar.gz geiser-guile-373b9a499dd4f26886c0e54612e638dd529bcc6f.tar.bz2 | |
Stopped over-aggressive memoization
It doesn't make sense to memoize the following:
geiser-start-server
geiser-macroexpand
| -rw-r--r-- | scheme/chicken/geiser/emacs.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scheme/chicken/geiser/emacs.scm b/scheme/chicken/geiser/emacs.scm index b08d8aa..401eb90 100644 --- a/scheme/chicken/geiser/emacs.scm +++ b/scheme/chicken/geiser/emacs.scm @@ -476,11 +476,11 @@ (define (form-has-safe-geiser? form) (any (cut eq? (car form) <>) - '(geiser-no-values geiser-newline geiser-start-server geiser-completions + '(geiser-no-values geiser-newline geiser-completions geiser-autodoc geiser-object-signature geiser-symbol-location geiser-symbol-documentation geiser-find-file geiser-add-to-load-path geiser-module-exports geiser-module-path geiser-module-location - geiser-module-completions geiser-macroexpand geiser-use-debug-log))) + geiser-module-completions geiser-use-debug-log))) (when (and module (not (symbol? module))) |