master 0f043af4dd0: Make woman-topic-history an obsolete alias

branch: master
commit 0f043af4dd072639a99dcf2336e33a8601943ee0
Author: Dan <[email protected]>
Commit: Sean Whitton <[email protected]>

    Make woman-topic-history an obsolete alias
    
    * lisp/woman.el (woman-topic-history): Make it an obsolete
    variable alias.
    (woman-file-name): Use 'Man-topic-history' instead of
    'woman-topic-history' (bug#81347).
    * etc/NEWS: Announce the change.
---
 etc/NEWS      | 6 ++++++
 lisp/woman.el | 4 ++--
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/etc/NEWS b/etc/NEWS
index 6c743afbe2f..4e3f8508da4 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -117,6 +117,12 @@ check out the repository to prepare a patch for the package maintainer.
 When a man page contains OSC 8 hyperlink escape sequences, they
 are now buttonized, allowing using mouse or 'RET' to follow them.
 
+** Woman
+
+---
+*** The variable 'woman-topic-history' is now obsolete
+Use 'Man-topic-history' instead.
+
 ** VC
 
 +++
diff --git a/lisp/woman.el b/lisp/woman.el
index dc100c6fbf2..5cdaa9b80a0 100644
--- a/lisp/woman.el
+++ b/lisp/woman.el
@@ -1227,7 +1227,7 @@ It is saved to the file named by the variable `woman-cache-filename'."
 	  (kill-buffer standard-output)
 	  ))))
 
-(defvaralias 'woman-topic-history 'Man-topic-history)
+(define-obsolete-variable-alias 'woman-topic-history 'Man-topic-history "32.1")
 (defvar woman-file-history nil "File-name read history.")
 
 (defun woman-file-name (topic &optional re-cache)
@@ -1271,7 +1271,7 @@ cache to be re-read."
 		(completing-read (format-prompt "Manual entry" default)
 		                 woman-topic-all-completions nil 1
 		                 nil
-		                 'woman-topic-history
+		                 'Man-topic-history
 		                 default))))
     ;; Note that completing-read always returns a string.
     (unless (= (length topic) 0)