aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/package.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index e2eba5afe11..10ce19525a0 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -3194,7 +3194,8 @@ The default regexp will hide only the package whose name is at point."
3194 (declare (interactive-only "change `package-hidden-regexps' instead.")) 3194 (declare (interactive-only "change `package-hidden-regexps' instead."))
3195 (let* ((name (when (derived-mode-p 'package-menu-mode) 3195 (let* ((name (when (derived-mode-p 'package-menu-mode)
3196 (concat "\\`" (regexp-quote (symbol-name (package-desc-name 3196 (concat "\\`" (regexp-quote (symbol-name (package-desc-name
3197 (tabulated-list-get-id))))))) 3197 (tabulated-list-get-id))))
3198 "\\'")))
3198 (re (read-string "Hide packages matching regexp: " name))) 3199 (re (read-string "Hide packages matching regexp: " name)))
3199 ;; Test if it is valid. 3200 ;; Test if it is valid.
3200 (string-match re "") 3201 (string-match re "")