summaryrefslogtreecommitdiff
path: root/lisp/printing.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/printing.el')
-rw-r--r--lisp/printing.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/printing.el b/lisp/printing.el
index 29e2192c963..d9bc97d48af 100644
--- a/lisp/printing.el
+++ b/lisp/printing.el
@@ -3,7 +3,7 @@
;; Copyright (C) 2000-2024 Free Software Foundation, Inc.
;; Author: Vinicius Jose Latorre <viniciusjl.gnu@gmail.com>
-;; Keywords: wp, print, PostScript
+;; Keywords: text, print, PostScript
;; Old-Version: 6.9.3
;; URL: https://www.emacswiki.org/cgi-bin/wiki/ViniciusJoseLatorre
@@ -1148,8 +1148,7 @@ Used by `pr-menu-bind' and `pr-update-menus'.")
(defun pr-menu-get-item (name-list)
;; NAME-LIST is a string or a list of strings.
- (or (listp name-list)
- (setq name-list (list name-list)))
+ (setq name-list (ensure-list name-list))
(and name-list
(let* ((reversed (reverse name-list))
(name (easy-menu-intern (car reversed)))