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 | cb9ea938ff56a4e0ae9e18c0fcad5a08eabc2c71 (patch) | |
| tree | 0ea9b84d7df37fc0136aa6a1e1bfac160de0e973 | |
| parent | d4572034847748746a586c3f02a8bad0c1a7dce2 (diff) | |
| download | emacs-cb9ea938ff56a4e0ae9e18c0fcad5a08eabc2c71.tar.gz | |
Delete the undo-in-progress compatibility code.
| -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 |