From b5fa335a002280b63a28c5a9d1c46573c5caab65 Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Thu, 17 Apr 2008 05:02:14 +0000 Subject: [PATCH] ERC: (erc-remove-text-properties-region): Disable this command by default. --- lisp/erc/ChangeLog | 5 +++++ lisp/erc/erc.el | 1 + 2 files changed, 6 insertions(+) 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 + + * erc.el (erc-remove-text-properties-region): Disable this command + by default. Thanks to e1f for the suggestion. + 2008-02-20 Michael Olson * 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 -- 2.39.5