[gnus git] branch master updated: m0-5-7-g6828b0f =1= nnspool.el (news-path): Use eval-and-compile

Katsumi Yamaoka <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  6828b0fb18eb20a8e19d62b34c269968bf0ec90e (commit)
      from  ae9aa6784a1d1ec21d3c0778d987e9af5d06ce87 (commit)


- Log -----------------------------------------------------------------
commit 6828b0fb18eb20a8e19d62b34c269968bf0ec90e
Author: Katsumi Yamaoka <[email protected]>
Date:   Fri May 25 06:43:21 2012 +0000

    nnspool.el (news-path): Use eval-and-compile

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d582c39..b290f40 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-05-25  Katsumi Yamaoka  <[email protected]>
+
+	* nnspool.el (news-path): Use eval-and-compile.
+
 2012-05-24  Glenn Morris  <[email protected]>
 
 	* nnspool.el (news-directory, news-path, news-inews-program):
diff --git a/lisp/nnspool.el b/lisp/nnspool.el
index fd079d9..ad9e9c6 100644
--- a/lisp/nnspool.el
+++ b/lisp/nnspool.el
@@ -34,11 +34,12 @@
 ;; Probably this entire thing should be obsolete.
 ;; It's only used to init nnspool-spool-directory, so why not just
 ;; set that variable's default directly?
-(defvar news-directory (if (file-exists-p "/usr/spool/news/")
+(eval-and-compile
+  (defvar news-directory (if (file-exists-p "/usr/spool/news/")
 			   "/usr/spool/news/"
 			 "/var/spool/news/")
   "The root directory below which all news files are stored.")
-(defvaralias 'news-path 'news-directory)
+  (defvaralias 'news-path 'news-directory))
 
 ;; Ditto re obsolescence.
 (defvar news-inews-program

-----------------------------------------------------------------------
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  |    4 ++++
 lisp/nnspool.el |   11 ++++++-----
 2 files changed, 10 insertions(+), 5 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.