[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/hilit-chg.el
From: |
Lars Hansen |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/hilit-chg.el |
Date: |
Wed, 10 Aug 2005 15:39:32 -0400 |
Index: emacs/lisp/hilit-chg.el
diff -c emacs/lisp/hilit-chg.el:1.34 emacs/lisp/hilit-chg.el:1.35
*** emacs/lisp/hilit-chg.el:1.34 Sat Aug 6 22:13:43 2005
--- emacs/lisp/hilit-chg.el Wed Aug 10 19:39:32 2005
***************
*** 673,678 ****
--- 673,679 ----
(if new-highlight-changes-mode
;; mode is turned on -- but may be passive
(progn
+ (add-to-list 'desktop-locals-to-save 'highlight-changes-mode)
(hilit-chg-set new-highlight-changes-mode)
(or was-on
;; run highlight-changes-enable-hook once
***************
*** 1153,1158 ****
--- 1154,1169 ----
(hilit-chg-turn-off-maybe))
)))
(buffer-list)))
+
+ ;;;; Desktop support.
+
+ ;; Called by `desktop-create-buffer' to restore `highlight-changes-mode'.
+ (defun hilit-chg-desktop-restore (desktop-buffer-locals)
+ (highlight-changes-mode
+ (or (cdr (assq 'highlight-changes-mode desktop-buffer-locals)) 1)))
+
+ (add-to-list 'desktop-minor-mode-handlers
+ '(highlight-changes-mode . hilit-chg-desktop-restore))
;; ===================== debug ==================
;; For debug & test use: