Delete obsolete variable nntp-authinfo-file

* lisp/gnus/nntp.el (nntp-authinfo-file): Delete variable obsolete
since 24.1.
This commit is contained in:
Stefan Kangas 2022-07-16 09:54:59 +02:00
parent 0443f3f660
commit 409b581b09
2 changed files with 10 additions and 28 deletions

View file

@ -2446,14 +2446,15 @@ but switching to `ash` is generally much preferable.
'meta-complete-symbol', 'meta-mode-map',
'minibuffer-completing-symbol',
'minibuffer-local-filename-must-match-map', 'mode25', 'mode4350',
'msb-after-load-hooks', 'nnimap-split-rule', 'ns-alternatives-map',
'ns-store-cut-buffer-internal', 'package-menu-view-commentary',
'pascal-last-completions', 'pascal-show-completions',
'pascal-toggle-completions', 'prolog-char-quote-workaround',
'read-filename-at-point', 'reftex-index-map',
'reftex-index-phrases-map', 'reftex-select-bib-map',
'reftex-select-label-map', 'reftex-toc-map', 'register-name-alist',
'register-value', 'report-emacs-bug-pretest-address',
'msb-after-load-hooks', 'nnimap-split-rule', 'nntp-authinfo-file',
'ns-alternatives-map', 'ns-store-cut-buffer-internal',
'package-menu-view-commentary', 'pascal-last-completions',
'pascal-show-completions', 'pascal-toggle-completions',
'prolog-char-quote-workaround', 'read-filename-at-point',
'reftex-index-map', 'reftex-index-phrases-map',
'reftex-select-bib-map', 'reftex-select-label-map', 'reftex-toc-map',
'register-name-alist', 'register-value',
'report-emacs-bug-pretest-address',
'rmail-default-dont-reply-to-names', 'rmail-dont-reply-to',
'rmail-dont-reply-to-names', 'rst-block-face', 'rst-comment-face',
'rst-definition-face', 'rst-directive-face', 'rst-emphasis1-face',

View file

@ -217,25 +217,6 @@ then use this hook to rsh to the remote machine and start a proxy NNTP
server there that you can connect to. See also
`nntp-open-connection-function'")
(defcustom nntp-authinfo-file "~/.authinfo"
".netrc-like file that holds nntp authinfo passwords."
:type
'(choice file
(repeat :tag "Entries"
:menu-tag "Inline"
(list :format "%v"
:value ("" ("login" . "") ("password" . ""))
(string :tag "Host")
(checklist :inline t
(cons :format "%v"
(const :format "" "login")
(string :format "Login: %v"))
(cons :format "%v"
(const :format "" "password")
(string :format "Password: %v")))))))
(make-obsolete-variable 'nntp-authinfo-file 'netrc-file "24.1")
(defvoo nntp-connection-timeout nil
@ -1166,7 +1147,7 @@ and a password.
If SEND-IF-FORCE, only send authinfo to the server if the
.authinfo file has the FORCE token."
(require 'netrc)
(let* ((list (netrc-parse nntp-authinfo-file))
(let* ((list (netrc-parse))
(alist (netrc-machine list nntp-address "nntp"))
(auth-info
(nth 0 (auth-source-search