diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-08-08 22:22:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-08-08 22:22:56 +0000 |
| commit | fdbd749a3fc1663bc0db36f63be5430de08bae39 (patch) | |
| tree | 3deeaea2301c342ce27a3af49cbfd96fe252a45f /lisp/hilit-chg.el | |
| parent | e287d32889b3e57ba9f5f1cebf26a554212d2526 (diff) | |
| download | emacs-fdbd749a3fc1663bc0db36f63be5430de08bae39.tar.gz | |
Delete the undo-in-progress compatibility code.
Diffstat (limited to 'lisp/hilit-chg.el')
| -rw-r--r-- | lisp/hilit-chg.el | 12 |
1 files changed, 1 insertions, 11 deletions
diff --git a/lisp/hilit-chg.el b/lisp/hilit-chg.el index 132d8f81b10..eae732b8d3f 100644 --- a/lisp/hilit-chg.el +++ b/lisp/hilit-chg.el @@ -195,16 +195,6 @@ ;;; Code: -;; ========== Remove when undo-in-progress is set by emacs ======== -(unless (boundp 'undo-in-progress) - (message "advising undo...") - (eval-when-compile (require 'advice)) - (defvar undo-in-progress nil) ;; only undo should change this! - (defadvice undo (around record-this-is-an-undo activate) - (let ((undo-in-progress t)) - ad-do-it))) -;; ================================================================ - (require 'wid-edit) ;; ====================== Customization ======================= @@ -1198,5 +1188,5 @@ from `global-highlight-changes' when turning on global Highlight Changes mode. (provide 'hilit-chg) -;;; hilit-chg.el ends here +;;; hilit-chg.el ends here |