From: Stefan Kangas <stefankangas@gmail.com>
Date: Tue, 8 Aug 2023 17:16:23 +0000 (+0200)
Subject: Make news-path variable obsolete
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2752573dfb76873dbe783e89a1fbf01d157c54e3;p=emacs.git

Make news-path variable obsolete

* lisp/gnus/nnspool.el (news-path): Make obsolete.
(nnspool-spool-directory): Don't use above obsolete variable.
---

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/")