summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPieter van Oostrum <pieter@vanoostrum.org>2020-02-09 16:55:29 +0100
committerEli Zaretskii <eliz@gnu.org>2020-02-15 10:23:21 +0200
commit7448834f738b243d67f0bb2c9e8b531fc64d9064 (patch)
treeb7529716e67d8c987328eeb0f4d37540c79dc862
parentfaada7ca42661aff403a51a9003983369e68874e (diff)
downloademacs-7448834f738b243d67f0bb2c9e8b531fc64d9064.tar.gz
Correct default regexp in 'package-menu-hide-package'
* lisp/emacs-lisp/package.el (package-menu-mode-menu): Correct default regexp, so it only selects the package at point. (Bug#39436)
-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."
(declare (interactive-only "change `package-hidden-regexps' instead."))
(let* ((name (when (derived-mode-p 'package-menu-mode)
(concat "\\`" (regexp-quote (symbol-name (package-desc-name
- (tabulated-list-get-id)))))))
+ (tabulated-list-get-id))))
+ "\\'")))
(re (read-string "Hide packages matching regexp: " name)))
;; Test if it is valid.
(string-match re "")