From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 14 Sep 2001 11:08:20 +0000 (+0000)
Subject: Comment out change of 2001-09-13.
X-Git-Tag: emacs-pretest-21.0.106~115
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=49c14a0533e1aefde82d7deab2afd7107f313483;p=emacs.git

Comment out change of 2001-09-13.
---

diff --git a/lisp/simple.el b/lisp/simple.el
index 19fee9a0c92..91a99a7a3e0 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4188,23 +4188,23 @@ See also `normal-erase-is-backspace'."
 
 ;;; Minibuffer prompt stuff.
 
-(defun minibuffer-prompt-modification (start end)
-  (error "You cannot modify the prompt"))
-
-
-(defun minibuffer-prompt-insertion (start end)
-  (let ((inhibit-modification-hooks t))
-    (delete-region start end)
-    ;; Discard undo information for the text insertion itself
-    ;; and for the text deletion.above.
-    (when (consp buffer-undo-list)
-      (setq buffer-undo-list (cddr buffer-undo-list)))
-    (message "You cannot modify the prompt")))
-
-
-(setq minibuffer-prompt-properties 
-  (list 'modification-hooks '(minibuffer-prompt-modification)
-	'insert-in-front-hooks '(minibuffer-prompt-insertion)))
-  
+;(defun minibuffer-prompt-modification (start end)
+;  (error "You cannot modify the prompt"))
+;
+;
+;(defun minibuffer-prompt-insertion (start end)
+;  (let ((inhibit-modification-hooks t))
+;    (delete-region start end)
+;    ;; Discard undo information for the text insertion itself
+;    ;; and for the text deletion.above.
+;    (when (consp buffer-undo-list)
+;      (setq buffer-undo-list (cddr buffer-undo-list)))
+;    (message "You cannot modify the prompt")))
+;
+;
+;(setq minibuffer-prompt-properties 
+;  (list 'modification-hooks '(minibuffer-prompt-modification)
+;	'insert-in-front-hooks '(minibuffer-prompt-insertion)))
+;  
 
 ;;; simple.el ends here