all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Juanma Barranquero <lektu@terra.es>
Subject: ielm-prompt read-only and customizable
Date: Mon, 18 Feb 2002 10:55:25 +0100	[thread overview]
Message-ID: <20020218105042.1440.LEKTU@terra.es> (raw)

This patch makes ielm-prompt be read-only, which seems like a sensible
thing to do (other prompts, like eshell's, are already read-only).

It also makes it customizable, so the read-only status of the prompt can
be automatically enforced.


                                                           /L/e/k/t/u



2002-02-18  Juanma Barranquero  <lektu@terra.es>

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



Index: ielm.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ielm.el,v
retrieving revision 1.22
diff -u -r1.22 ielm.el
--- ielm.el	10 Oct 2000 17:27:38 -0000	1.22
+++ ielm.el	18 Feb 2002 09:51:38 -0000
@@ -70,8 +70,12 @@
   :type 'boolean
   :group 'ielm)
 
-(defvar ielm-prompt "ELISP> "
-  "Prompt used in IELM.")
+(defcustom ielm-prompt "ELISP> "
+  "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
   "*Controls whether \\<ielm-map>\\[ielm-return] has intelligent behaviour in IELM.


_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://mail.gnu.org/mailman/listinfo/emacs-devel


                 reply	other threads:[~2002-02-18  9:55 UTC|newest]

Thread overview: [no followups] expand[flat|nested]  mbox.gz  Atom feed

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20020218105042.1440.LEKTU@terra.es \
    --to=lektu@terra.es \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.