diff options
| author | jao <jao@gnu.org> | 2024-02-08 00:26:36 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2024-02-08 00:26:36 +0000 |
| commit | 4e64934bd2ae7c6f0e4acb9f2ed017844c187223 (patch) | |
| tree | 5c2aff1547ad4102ccaaf11103cdf03adf341fbb /elisp | |
| parent | 29e2b886c82f38a36adb5430064d82ed3066602a (diff) | |
| download | geiser-4e64934bd2ae7c6f0e4acb9f2ed017844c187223.tar.gz geiser-4e64934bd2ae7c6f0e4acb9f2ed017844c187223.tar.bz2 | |
geiser-edit: new customization group
Fixes issue #20
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser-edit.el | 16 | ||||
| -rw-r--r-- | elisp/geiser.el | 1 |
2 files changed, 11 insertions, 6 deletions
diff --git a/elisp/geiser-edit.el b/elisp/geiser-edit.el index df4231c..1954062 100644 --- a/elisp/geiser-edit.el +++ b/elisp/geiser-edit.el @@ -1,6 +1,6 @@ ;;; geiser-edit.el -- scheme edit locations -*- lexical-binding: t; -*- -;; Copyright (C) 2009, 2010, 2012, 2013, 2019-2023 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2012, 2013, 2019-2024 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 @@ -36,8 +36,16 @@ "How the new buffer is opened when invoking \\[geiser-edit-symbol-at-point] or following links in error buffers.") +(defgroup geiser-edit nil + "Customizations for scheme buffers and information about them." + :group 'geiser) + (geiser-custom--defface error-link - 'link geiser-debug "links in error buffers") + 'link geiser-edit "links in error buffers") + +(geiser-custom--defcustom geiser-insert-actual-lambda t + "Whether geiser-insert-lambda should insert \"λ\" or \"lambda\"." + :type 'boolean) ;;; Auxiliary functions: @@ -298,10 +306,6 @@ With prefix, asks for the symbol to locate." (when marker (xref-push-marker-stack marker)) t))) -(geiser-custom--defcustom geiser-insert-actual-lambda t - "Whether geiser-insert-lambda should insert \"λ\" or \"lambda\"." - :type 'boolean) - (defun geiser-insert-lambda (&optional full) "Insert λ or lambda at point. With prefix, inserts (λ ()) or (lambda ()). diff --git a/elisp/geiser.el b/elisp/geiser.el index 837a9d5..8f85662 100644 --- a/elisp/geiser.el +++ b/elisp/geiser.el @@ -108,6 +108,7 @@ (custom-add-load group (symbol-name group)) (custom-add-load 'geiser (symbol-name group))) '(geiser + geiser-edit geiser-repl geiser-autodoc geiser-doc |