monnier pushed a commit to branch master in repository elpa. commit 48fa0f036e5b68fd01564967317bc5bc28bdab1f Author: Teemu Likonen <tliko...@iki.fi> 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))