summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-08-19 23:44:54 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-08-19 23:44:54 +0200
commit1260755d66427531dbdbb01b03b060486b037ed5 (patch)
tree66beb595557a7730b80cde77d10ce092b96725ad
parentbe62a84152d62a0658ee61fa46d035f676d46c27 (diff)
downloadgeiser-guile-1260755d66427531dbdbb01b03b060486b037ed5.tar.gz
geiser-guile-1260755d66427531dbdbb01b03b060486b037ed5.tar.bz2
C-c k == nuke repl
-rw-r--r--README37
-rw-r--r--elisp/geiser-repl.el4
2 files changed, 21 insertions, 20 deletions
diff --git a/README b/README
index 626bed9..141b83d 100644
--- a/README
+++ b/README
@@ -22,9 +22,7 @@
Currently supported implementations are Guile and PLT.
- - Guile works only with the development, vm-based binary. Be sure
- to customize `geiser-repl-guile-binary' to point to a correct vm
- binary.
+ - Guile 1.9.x virtual machine required.
- PLT Scheme 4.1.5.5 or better required.
* Installation
@@ -94,22 +92,23 @@
*** In the REPL
- |----------------+-------------------------------------------|
- | C-c C-z, C-c z | Start Scheme REPL (if it's not running) |
- |----------------+-------------------------------------------|
- | M-. | Edit identifier at point |
- | TAB, M-TAB | Complete identifier at point |
- | M-`, C-. | Complete module name at point |
- |----------------+-------------------------------------------|
- | M-p, M-n | Prompt history, matching current prefix |
- |----------------+-------------------------------------------|
- | C-c k | Compile and load scheme file |
- | C-c l | Load scheme file |
- |----------------+-------------------------------------------|
- | C-c d | See documentation for identifier at point |
- | C-c m | See module documentation |
- | C-c a | Toggle autodoc mode |
- |----------------+-------------------------------------------|
+ |----------------+----------------------------------------------------|
+ | C-c C-z, C-c z | Start Scheme REPL (if it's not running) |
+ |----------------+----------------------------------------------------|
+ | M-. | Edit identifier at point |
+ | TAB, M-TAB | Complete identifier at point |
+ | M-`, C-. | Complete module name at point |
+ |----------------+----------------------------------------------------|
+ | M-p, M-n | Prompt history, matching current prefix |
+ |----------------+----------------------------------------------------|
+ | C-c C-k, C-c k | Nuke REPL: use it if the REPL becomes unresponsive |
+ |----------------+----------------------------------------------------|
+ | C-c l | Load scheme file |
+ |----------------+----------------------------------------------------|
+ | C-c d | See documentation for identifier at point |
+ | C-c m | See module documentation |
+ | C-c a | Toggle autodoc mode |
+ |----------------+----------------------------------------------------|
*** In the documentation browser:
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index 8eb1fc9..bed653f 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -297,6 +297,9 @@ If no REPL is running, execute `run-geiser' to start a fresh one."
(define-key geiser-repl-mode-map "\C-d" 'delete-char)
+(define-key geiser-repl-mode-map "\C-ck" 'geiser-repl-nuke)
+(define-key geiser-repl-mode-map "\C-c\C-k" 'geiser-repl-nuke)
+
(define-key geiser-repl-mode-map "\C-cz" 'switch-to-geiser)
(define-key geiser-repl-mode-map "\C-c\C-z" 'switch-to-geiser)
(define-key geiser-repl-mode-map "\C-a" 'geiser-repl--bol)
@@ -304,7 +307,6 @@ If no REPL is running, execute `run-geiser' to start a fresh one."
(define-key geiser-repl-mode-map "\C-ca" 'geiser-autodoc-mode)
(define-key geiser-repl-mode-map "\C-cd" 'geiser-doc-symbol-at-point)
(define-key geiser-repl-mode-map "\C-cm" 'geiser-repl--doc-module)
-(define-key geiser-repl-mode-map "\C-ck" 'geiser-compile-file)
(define-key geiser-repl-mode-map "\C-cl" 'geiser-load-file)
(define-key geiser-repl-mode-map "\M-p" 'comint-previous-matching-input-from-input)