[gnus git] branch master updated: n0-17-92-g4947111 =1= Ugly hack to wrap the `find-file-hook' things in `symbol-value' to avoid compilation warnings on all architectures.

Lars Magne Ingebrigtsen <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  49471116eff3f3f2d01b5d442c3c125a167d17a8 (commit)
      from  ea7237092488285b9607ec405873715a67fd5bbe (commit)


- Log -----------------------------------------------------------------
commit 49471116eff3f3f2d01b5d442c3c125a167d17a8
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jun 26 13:42:53 2011 +0200

    Ugly hack to wrap the `find-file-hook' things in `symbol-value' to avoid compilation warnings on all architectures.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4ea4814..019b9e4 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,9 @@
 
 	* auth-source.el (with-auth-source-epa-overrides): Fix compilation
 	error with `find-file-hooks' on Emacs 22.
+	(with-auth-source-epa-overrides): Ugly hack to Wrap the
+	`find-file-hook' things in `symbol-value' to avoid compilation warnings
+	on all architectures.
 
 	* spam.el (spam-stat): Require in a normal fashion without binding
 	`spam-stat-install-hooks' to avoid compilation warnings.
diff --git a/lisp/auth-source.el b/lisp/auth-source.el
index 2e8a82a..146db11 100644
--- a/lisp/auth-source.el
+++ b/lisp/auth-source.el
@@ -981,7 +981,9 @@ Note that the MAX parameter is used so we can exit the parse early."
          (,(if (boundp 'find-file-hook) 'find-file-hook 'find-file-hooks)
           ',(remove
              'epa-file-find-file-hook
-             (if (boundp 'find-file-hook) find-file-hook find-file-hooks)))
+             (if (boundp 'find-file-hook)
+		 (symbol-value 'find-file-hook)
+	       (symbol-value 'find-file-hooks))))
          (auto-mode-alist
           ',(if (boundp 'epa-file-auto-mode-alist-entry)
                 (remove (symbol-value 'epa-file-auto-mode-alist-entry)

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog      |    3 +++
 lisp/auth-source.el |    4 +++-
 2 files changed, 6 insertions(+), 1 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.