diff options
| -rw-r--r-- | lisp/emacs-lisp/package.el | 3 |
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 "") |