mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

Delete the undo-in-progress compatibility code.

Browse Source
This commit is contained in:
Richard M. Stallman 1998-08-08 22:22:56 +00:00
parent e287d32889
commit fdbd749a3f
1 changed files with 1 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lisp/hilit-chg.el
View File

@ -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