Remove variable aliases obsolete since Emacs 23.2

* lisp/dired.el (dired-advertised-find-file):
* lisp/simple.el (advertised-undo):
* lisp/wid-edit.el (advertised-widget-backward): Remove variable
aliases obsolete since Emacs 23.2.  They are replaced by
':advertised-binding' properties.
* lisp/arc-mode.el (archive-mode-map):
* lisp/dired.el (dired-mode-map):
* lisp/obsolete/landmark.el (landmark-mode-map):
* lisp/play/decipher.el (decipher-mode-map):
* lisp/play/gomoku.el (gomoku-mode-map):
* lisp/proced.el (proced-mode-map): Don't bind above removed commands.

etc/NEWS

@@ -1823,6 +1823,10 @@ This function inserts the special EVENT into the input event queue.
 This event is sent when the device running Emacs enters or leaves the
 sleep state.
 
+** Variable aliases obsolete since Emacs 23.2 have been removed:
+'advertised-undo', 'advertised-widget-backward', and
+'dired-advertised-find-file'.
+
 
 * Changes in Emacs 31.1 on Non-Free Operating Systems
 

lisp/arc-mode.el

@@ -444,7 +444,6 @@ be added."
     ;; Let mouse-1 follow the link.
     (define-key map [follow-link] 'mouse-face)
 
-    (define-key map [remap advertised-undo] #'archive-undo)
     (define-key map [remap undo] #'archive-undo)
 
     (define-key map [mouse-2] 'archive-extract)

lisp/dired.el

@@ -2439,7 +2439,6 @@ Do so according to the former subdir alist OLD-SUBDIR-ALIST."
   "?"       #'dired-summary
   "DEL"     #'dired-unmark-backward
   "<remap> <undo>"             #'dired-undo
-  "<remap> <advertised-undo>"  #'dired-undo
   "<remap> <vc-next-action>"   #'dired-vc-next-action
   ;; thumbnail manipulation (image-dired)
   "C-t d"   #'image-dired-display-thumbs
@@ -3026,9 +3025,6 @@ directory in another window."
                 (concat "File no longer exists; type \\<dired-mode-map>"
                         "\\[revert-buffer] to update Dired buffer")))))))
 
-;; Force C-m keybinding rather than `f' or `e' in the mode doc:
-(define-obsolete-function-alias 'dired-advertised-find-file
-  #'dired-find-file "23.2")
 (defun dired-find-file ()
   "In Dired, visit the file or directory named on this line."
   (interactive nil dired-mode)

lisp/emacs-lisp/float-sup.el

@@ -30,7 +30,7 @@
 (with-suppressed-warnings ((lexical pi))
   (defconst pi float-pi
     "Obsolete since Emacs-23.3.  Use `float-pi' instead."))
-(make-obsolete-variable 'pi 'float-pi "23.3")
+(make-obsolete-variable 'pi 'float-pi "23.3") ; "28.1"
 (internal-make-var-non-special 'pi)
 
 (defconst float-e (exp 1) "The value of e (2.7182818...).")

lisp/obsolete/landmark.el

@@ -206,7 +206,6 @@
     (define-key map [remap beginning-of-line] #'landmark-beginning-of-line)
     (define-key map [remap end-of-line] #'landmark-end-of-line)
     (define-key map [remap undo] #'landmark-human-takes-back)
-    (define-key map [remap advertised-undo] #'landmark-human-takes-back)
     map)
   "Local keymap to use in Landmark mode.")
 

lisp/play/decipher.el

@@ -150,8 +150,7 @@ the tail of the list."
   "R"   #'decipher-restore-checkpoint
   "U"   #'decipher-undo
   "SPC" #'decipher-keypress
-  "<remap> <undo>" #'decipher-undo
-  "<remap> <advertised-undo>" #'decipher-undo)
+  "<remap> <undo>" #'decipher-undo)
 (let ((key ?a))
   (while (<= key ?z)
     (keymap-set decipher-mode-map (char-to-string key) #'decipher-keypress)

lisp/play/gomoku.el

@@ -153,8 +153,7 @@ SHOULD be at least 2 (MUST BE at least 1).")
   "<remap> <next-line>"              #'gomoku-move-down
   "<remap> <move-beginning-of-line>" #'gomoku-beginning-of-line
   "<remap> <move-end-of-line>"       #'gomoku-end-of-line
-  "<remap> <undo>"                   #'gomoku-human-takes-back
-  "<remap> <advertised-undo>"        #'gomoku-human-takes-back)
+  "<remap> <undo>"                   #'gomoku-human-takes-back)
 
 
 (defvar gomoku-emacs-won ()

lisp/proced.el

@@ -655,7 +655,6 @@ Important: the match ends just after the marker.")
   "h"         #'describe-mode
   "?"         #'proced-help
   "<remap> <undo>"            #'proced-undo
-  "<remap> <advertised-undo>" #'proced-undo
   ;; Additional keybindings are inherited from `special-mode-map'
   )
 (put 'proced-mark :advertised-binding "m")

lisp/simple.el

@@ -3379,9 +3379,6 @@ the minibuffer contents."
                                minibuffer-prompt-properties))))
 
 
-;Put this on C-x u, so we can force that rather than C-_ into startup msg
-(define-obsolete-function-alias 'advertised-undo 'undo "23.2")
-
 (defconst undo-equiv-table (make-hash-table :test 'eq :weakness t)
   "Table mapping redo records to the corresponding undo one.
 A redo record for an undo in region maps to `undo-in-region'.

lisp/wid-edit.el

@@ -1094,12 +1094,6 @@ button end points."
 
 ;;; Keymap and Commands.
 
-;; This alias exists only so that one can choose in doc-strings (e.g.
-;; Custom-mode) which key-binding of widget-keymap one wants to refer to.
-;; https://lists.gnu.org/r/emacs-devel/2008-11/msg00480.html
-(define-obsolete-function-alias 'advertised-widget-backward
-  #'widget-backward "23.2")
-
 ;;;###autoload
 (defvar widget-keymap
   (let ((map (make-sparse-keymap)))