emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 55/352: Päivitetään myös outline-näkyvyyden muuttuessa


From: Stefan Monnier
Subject: [elpa] 55/352: Päivitetään myös outline-näkyvyyden muuttuessa
Date: Mon, 07 Jul 2014 14:01:59 +0000

monnier pushed a commit to branch master
in repository elpa.

commit 48fa0f036e5b68fd01564967317bc5bc28bdab1f
Author: Teemu Likonen <address@hidden>
Date:   Fri May 22 11:18:00 2009 +0000

    Päivitetään myös outline-näkyvyyden muuttuessa
    
    Lisätään puskurikohtainen koukku, joka pyytää puskurille
    oikolukupäivitystä, kun outline-tilassa tekstiä piilottaa tai avaa.
---
 wcheck-mode.el |   11 ++++++++++-
 1 files changed, 10 insertions(+), 1 deletions(-)

diff --git a/wcheck-mode.el b/wcheck-mode.el
index 330c969..1f13f36 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -335,6 +335,8 @@ information on how to configure Wcheck mode. Interactive 
command
         (add-hook 'after-change-functions 'wcheck-hook-after-change nil t)
         (add-hook 'change-major-mode-hook
                   'wcheck-hook-change-major-mode nil t)
+        (add-hook 'outline-view-change-hook
+                  'wcheck-hook-outline-view-change nil t)
 
         ;; Add global hooks. It's probably sufficient to add these only
         ;; once but it's no harm to ensure their existence every time.
@@ -382,7 +384,9 @@ information on how to configure Wcheck mode. Interactive 
command
     (remove-hook 'window-scroll-functions 'wcheck-hook-window-scroll t)
     (remove-hook 'after-change-functions 'wcheck-hook-after-change t)
     (remove-hook 'change-major-mode-hook
-                 'wcheck-hook-change-major-mode t)))
+                 'wcheck-hook-change-major-mode t)
+    (remove-hook 'outline-view-change-hook
+                 'wcheck-hook-outline-view-change t)))
 
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -523,6 +527,11 @@ muutettu."
     (wcheck-timer-read-request (current-buffer))))
 
 
+(defun wcheck-hook-outline-view-change ()
+  (when wcheck-mode
+    (wcheck-timer-read-request (current-buffer))))
+
+
 (defun wcheck-hook-kill-buffer ()
   "Sammuttaa oikoluvun tämän puskurin osalta."
   (wcheck-mode 0))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]