# HG changeset patch
# User Michael Olson <mwolson@gnu.org>
# Date 1208408534 0
# Node ID 908993cbed5ec5b6ae31c8b9cc4df1d68c29f7e6
# Parent  894b44742e96d44f717330ca552e3ac831ff6a7a
ERC: (erc-remove-text-properties-region): Disable this command by default.

diff -r 894b44742e96 -r 908993cbed5e lisp/erc/ChangeLog
--- a/lisp/erc/ChangeLog	Thu Apr 17 05:00:21 2008 +0000
+++ b/lisp/erc/ChangeLog	Thu Apr 17 05:02:14 2008 +0000
@@ -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 -r 894b44742e96 -r 908993cbed5e lisp/erc/erc.el
--- a/lisp/erc/erc.el	Thu Apr 17 05:00:21 2008 +0000
+++ b/lisp/erc/erc.el	Thu Apr 17 05:02:14 2008 +0000
@@ -5477,6 +5477,7 @@
   (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