Commit 40cf8f25 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

(ielm-prompt): Allow customization; make it read-only.

parent e63e8d3e
...@@ -70,8 +70,12 @@ ...@@ -70,8 +70,12 @@
:type 'boolean :type 'boolean
:group 'ielm) :group 'ielm)
(defvar ielm-prompt "ELISP> " (defcustom ielm-prompt "ELISP> "
"Prompt used in IELM.") "Prompt used in IELM."
:type 'string
:group 'ielm
:get #'(lambda (symbol) (substring-no-properties (symbol-value symbol)))
:set #'(lambda (symbol value) (set symbol (propertize value 'read-only t 'rear-nonsticky t))))
(defcustom ielm-dynamic-return t (defcustom ielm-dynamic-return t
"*Controls whether \\<ielm-map>\\[ielm-return] has intelligent behaviour in IELM. "*Controls whether \\<ielm-map>\\[ielm-return] has intelligent behaviour in IELM.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment