diff options
| -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 |