Normalize version specifiers for make-obsolete and friends

* lisp/auth-source.el (auth-source-forget-user-or-password)
(auth-source-user-or-password, auth-source-hide-passwords):
* lisp/calendar/icalendar.el (icalendar--datetime-to-noneuropean-date):
* lisp/cedet/semantic/db-el.el (semanticdb-elisp-sym-function-arglist):
* lisp/emacs-lisp/debug.el (debugger-insert-backtrace):
* lisp/obsolete/nnir.el (nnir-swish-e-index-file):
* lisp/obsolete/starttls.el (starttls-any-program-available):
Normalize version specifiers for make-obsolete and friends.
This commit is contained in:
Stefan Kangas 2021-03-08 05:09:27 +01:00
parent 570afde376
commit 0e4a2dca83
6 changed files with 10 additions and 10 deletions

View file

@ -162,7 +162,7 @@ let-binding."
(defvar auth-source-creation-prompts nil
"Default prompts for token values. Usually let-bound.")
(make-obsolete 'auth-source-hide-passwords nil "Emacs 24.1")
(make-obsolete 'auth-source-hide-passwords nil "24.1")
(defcustom auth-source-save-behavior 'ask
"If set, auth-source will respect it for save behavior."
@ -2307,9 +2307,9 @@ See `auth-source-search' for details on SPEC."
;; deprecate the old interface
(make-obsolete 'auth-source-user-or-password
'auth-source-search "Emacs 24.1")
'auth-source-search "24.1")
(make-obsolete 'auth-source-forget-user-or-password
'auth-source-forget "Emacs 24.1")
'auth-source-forget "24.1")
(defun auth-source-user-or-password
(mode host port &optional username create-missing delete-existing)

View file

@ -774,7 +774,7 @@ American format: \"month day year\"."
nil))
(define-obsolete-function-alias 'icalendar--datetime-to-noneuropean-date
'icalendar--datetime-to-american-date "icalendar 0.19")
'icalendar--datetime-to-american-date "23.1")
(defun icalendar--datetime-to-european-date (datetime &optional separator)
"Convert the decoded DATETIME to European format.

View file

@ -195,9 +195,6 @@ If Emacs cannot resolve this symbol to a particular file, then return nil."
(when tab (cons tab match))))))
(autoload 'help-function-arglist "help-fns")
(defalias 'semanticdb-elisp-sym-function-arglist 'help-function-arglist)
(make-obsolete 'semanticdb-elisp-sym-function-arglist
'help-function-arglist "CEDET 1.1")
(defun semanticdb-elisp-sym->tag (sym &optional toktype)
"Convert SYM into a semantic tag.
@ -347,6 +344,9 @@ Return a list of tags."
)
taglst))))
(define-obsolete-function-alias 'semanticdb-elisp-sym-function-arglist
#'help-function-arglist "24.3")
(provide 'semantic/db-el)
;;; semantic/db-el.el ends here

View file

@ -321,7 +321,7 @@ the debugger will not be entered."
(make-obsolete 'debugger-insert-backtrace
"use a `backtrace-mode' buffer or `backtrace-to-string'."
"Emacs 27.1")
"27.1")
(defun debugger-insert-backtrace (frames do-xrefs)
"Format and insert the backtrace FRAMES at point.

View file

@ -279,7 +279,7 @@ that it is for swish++, not Namazu."
;; `nnir-swish-e-additional-switches'
(make-obsolete-variable 'nnir-swish-e-index-file
'nnir-swish-e-index-files "Emacs 23.1")
'nnir-swish-e-index-files "23.1")
(defcustom nnir-swish-e-index-file
(expand-file-name "~/Mail/index.swish-e")
"Index file for swish-e.

View file

@ -288,7 +288,7 @@ GnuTLS requires a port number."
starttls-program))))
(define-obsolete-function-alias 'starttls-any-program-available
#'starttls-available-p "2011-08-02")
#'starttls-available-p "24.1")
(provide 'starttls)