master 35e31c1: Revert "* lisp/calendar/appt.el (appt-activate): Set the local `write-file-functions`"

[Stefan Monnier]

branch: master
commit 35e31c1e7135c76076c771b153b13044af91bb56
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    Revert "* lisp/calendar/appt.el (appt-activate): Set the local 
`write-file-functions`"
    
    This reverts commit 587a97bcb23bc6ea429ab790efa03f2260a9bca8.
    We really do want to affect the global part of the hook.
    Reported by Gabriel <gabriel376@hotmail.com>.
---
 lisp/calendar/appt.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/calendar/appt.el b/lisp/calendar/appt.el
index 281b89e..29bcd6d 100644
--- a/lisp/calendar/appt.el
+++ b/lisp/calendar/appt.el
@@ -700,7 +700,7 @@ ARG is positive, otherwise off."
   (let ((appt-active appt-timer))
     (setq appt-active (if arg (> (prefix-numeric-value arg) 0)
                         (not appt-active)))
-    (remove-hook 'write-file-functions #'appt-update-list 'local)
+    (remove-hook 'write-file-functions #'appt-update-list)
     (or global-mode-string (setq global-mode-string '("")))
     (delq 'appt-mode-string global-mode-string)
     (when appt-timer
@@ -708,7 +708,7 @@ ARG is positive, otherwise off."
       (setq appt-timer nil))
     (if appt-active
         (progn
-          (add-hook 'write-file-functions #'appt-update-list nil t)
+          (add-hook 'write-file-functions #'appt-update-list)
           (setq appt-timer (run-at-time t 60 #'appt-check)
                 global-mode-string
                 (append global-mode-string '(appt-mode-string)))