summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorRay Racine <ray.racine@gmail.com>2013-02-02 13:05:44 -0500
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-02-03 00:51:10 +0100
commit43dd4894285c2b2aff6bcc17ac9b2bf8f3868702 (patch)
treeefcad19dd5597552441601526520562d8eb2d52f /elisp
parent9cdd48af25b299c32adb7dd1ddd025a5bc6fd1cf (diff)
downloadgeiser-guile-43dd4894285c2b2aff6bcc17ac9b2bf8f3868702.tar.gz
geiser-guile-43dd4894285c2b2aff6bcc17ac9b2bf8f3868702.tar.bz2
Insert Greek letter lambda.
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-edit.el8
-rw-r--r--elisp/geiser-mode.el1
2 files changed, 9 insertions, 0 deletions
diff --git a/elisp/geiser-edit.el b/elisp/geiser-edit.el
index 06ae1d1..874c9fc 100644
--- a/elisp/geiser-edit.el
+++ b/elisp/geiser-edit.el
@@ -234,6 +234,14 @@ With prefix, asks for the symbol to edit."
(geiser-completion--read-module)))
(when marker (ring-insert find-tag-marker-ring marker))))
+
+;; Editing key bindings
+
+(defun geiser-edit-insert-lambda ()
+ "Insert λ at point."
+ (interactive)
+ (insert-char ?λ 1))
+
(provide 'geiser-edit)
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el
index fc7715a..6df82a7 100644
--- a/elisp/geiser-mode.el
+++ b/elisp/geiser-mode.el
@@ -321,6 +321,7 @@ interacting with the Geiser REPL is at your disposal.
(custom "Customize Geiser mode" geiser-mode))
(define-key geiser-mode-map [menu-bar scheme] 'undefined)
+(define-key geiser-mode-map "\C-\\" 'geiser-edit-insert-lambda)
;; (geiser-mode--triple-chord ?x ?m 'geiser-xref-generic-methods)