From 5e2a84e30d41c4804111d8b2b3d74b40da1c3f57 Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Tue, 14 Sep 2010 16:59:42 +0200 Subject: Explicitly pass `obarray' to `unintern' to avoid a warning. * gnus/gnus-registry.el (gnus-registry-install-shortcuts) * obsolete/old-whitespace.el (whitespace-unload-function) --- lisp/obsolete/old-whitespace.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lisp/obsolete') diff --git a/lisp/obsolete/old-whitespace.el b/lisp/obsolete/old-whitespace.el index 4531bc06f8..0245537faa 100644 --- a/lisp/obsolete/old-whitespace.el +++ b/lisp/obsolete/old-whitespace.el @@ -788,7 +788,7 @@ This is meant to be added buffer-locally to `write-file-functions'." (defun whitespace-unload-function () "Unload the whitespace library." - (if (unintern "whitespace-unload-hook") + (if (unintern "whitespace-unload-hook" obarray) ;; if whitespace-unload-hook is defined, let's get rid of it ;; and recursively call `unload-feature' (progn (unload-feature 'whitespace) t) -- cgit v1.2.3