From: Michael Olson <mwolson@gnu.org>
Date: Thu, 17 Apr 2008 05:02:14 +0000 (+0000)
Subject: ERC: (erc-remove-text-properties-region): Disable this command by default.
X-Git-Tag: emacs-pretest-23.0.90~6243
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b5fa335a002280b63a28c5a9d1c46573c5caab65;p=emacs.git

ERC: (erc-remove-text-properties-region): Disable this command by default.
---

diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog
index fc230ddbe0e..35e9f57bf80 100644
--- a/lisp/erc/ChangeLog
+++ b/lisp/erc/ChangeLog
@@ -1,3 +1,8 @@
+2008-04-14  Michael Olson  <mwolson@gnu.org>
+
+	* erc.el (erc-remove-text-properties-region): Disable this command
+	by default.  Thanks to e1f for the suggestion.
+
 2008-02-20  Michael Olson  <mwolson@gnu.org>
 
 	* erc.el (erc-notice-face): Fix this face for Emacs 21 users.
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index a085336f9a1..1dae3562707 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -5477,6 +5477,7 @@ If CHANNEL is non-nil, toggle MODE for that channel, otherwise use
   (save-excursion
     (let ((inhibit-read-only t))
       (set-text-properties start end nil object))))
+(put 'erc-remove-text-properties-region 'disabled t)
 
 ;; script execution and startup