master cb86d1d: Make gnus-define-keys obsolete

[Lars Ingebrigtsen]

branch: master
commit cb86d1d0def61950a149445cbbde829a30e210c4
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make gnus-define-keys obsolete
    
    * lisp/gnus/gnus-util.el (gnus-define-keys):
    (gnus-define-keys-1): Make obsolete.
---
 etc/NEWS               | 4 ++++
 lisp/gnus/gnus-util.el | 3 ++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/etc/NEWS b/etc/NEWS
index 7b218aa..ab15b1e 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -118,6 +118,10 @@ Emacs buffers, like indentation and the like.  The new ert 
function
 * Incompatible Lisp Changes in Emacs 29.1
 
 ---
+** 'gnus-define-keys' is now obsolete.
+Use 'define-keymap' instead.
+
+---
 ** MozRepl has been removed from js.el.
 MozRepl was removed from Firefox in 2017, so this code doesn't work
 with recent versions of Firefox.
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el
index 0163aba..a777157 100644
--- a/lisp/gnus/gnus-util.el
+++ b/lisp/gnus/gnus-util.el
@@ -305,7 +305,7 @@ Symbols are also allowed; their print names are used 
instead."
 
 (defmacro gnus-define-keys (keymap &rest plist)
   "Define all keys in PLIST in KEYMAP."
-  (declare (indent 1))
+  (declare (obsolete define-keymap "29.1") (indent 1))
   `(gnus-define-keys-1 ,(if (symbolp keymap) keymap `',keymap) (quote ,plist)))
 
 (defmacro gnus-define-keys-safe (keymap &rest plist)
@@ -319,6 +319,7 @@ Symbols are also allowed; their print names are used 
instead."
   `(gnus-define-keys-1 ,keymap (quote ,plist)))
 
 (defun gnus-define-keys-1 (keymap plist &optional safe)
+  (declare (obsolete define-keymap "29.1"))
   (when (null keymap)
     (error "Can't set keys in a null keymap"))
   (cond ((symbolp keymap) (error "First arg should be a keymap object"))