[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 2752573dfb7 1/2: Make news-path variable obsolete
From: |
Stefan Kangas |
Subject: |
master 2752573dfb7 1/2: Make news-path variable obsolete |
Date: |
Tue, 8 Aug 2023 13:53:58 -0400 (EDT) |
branch: master
commit 2752573dfb76873dbe783e89a1fbf01d157c54e3
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
Make news-path variable obsolete
* lisp/gnus/nnspool.el (news-path): Make obsolete.
(nnspool-spool-directory): Don't use above obsolete variable.
---
lisp/gnus/nnspool.el | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/lisp/gnus/nnspool.el b/lisp/gnus/nnspool.el
index 3508c388897..ca97afcb7f1 100644
--- a/lisp/gnus/nnspool.el
+++ b/lisp/gnus/nnspool.el
@@ -35,7 +35,7 @@
;; It's only used to init nnspool-spool-directory, so why not just
;; set that variable's default directly?
(eval-and-compile
- (defvaralias 'news-path 'news-directory)
+ (define-obsolete-variable-alias 'news-path 'news-directory "30.1")
(defvar news-directory (if (file-exists-p "/usr/spool/news/")
"/usr/spool/news/"
"/var/spool/news/")
@@ -62,9 +62,7 @@ This is most commonly `inews' or `injnews'.")
If you are using Cnews, you probably should set this variable to nil.")
(defvoo nnspool-spool-directory
- (file-name-as-directory (if (boundp 'news-directory)
- (symbol-value 'news-directory)
- news-path))
+ (file-name-as-directory news-directory)
"Local news spool directory.")
(defvoo nnspool-nov-directory (concat nnspool-spool-directory "over.view/")