(whitespace-unload-hook): Call `remove-hook' with three arguments, not four.

2 files changed, 10 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8aaa36f19fb..be14cd1e361 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2002-09-13  Juanma Barranquero  <lektu@terra.es>
+
+        * progmodes/idlw-shell.el (idlwave-shell-cleanup): Fix reference
+        to `idlwave-idlwave_routine_info-compiled'.
+
+        * whitespace.el (whitespace-unload-hook): Call `remove-hook' with
+        three arguments, not four.
+
 2002-09-12  Richard M. Stallman  <rms@gnu.org>
 
         * international/mule-cmds.el (universal-coding-system-argument):
diff --git a/lisp/whitespace.el b/lisp/whitespace.el
index 27344312958..0742ae7fc62 100644
--- a/lisp/whitespace.el
+++ b/lisp/whitespace.el
@@ -5,7 +5,7 @@
 ;; Author: Rajesh Vaidheeswarran <rv@gnu.org>
 ;; Keywords: convenience
 
-;; $Id: whitespace.el,v 1.19 2001/12/13 17:34:57 rv Exp $
+;; $Id: whitespace.el,v 1.20 2002/09/11 21:30:25 monnier Exp $
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -843,7 +843,7 @@ This is meant to be added buffer-locally to `write-file-functions'."
 
 (defun whitespace-unload-hook ()
   (remove-hook 'find-file-hook 'whitespace-buffer)
-  (remove-hook 'write-file-functions 'whitespace-write-file-hook nil t)
+  (remove-hook 'write-file-functions 'whitespace-write-file-hook t)
   (remove-hook 'kill-buffer-hook 'whitespace-buffer))
 
 (provide 'whitespace)