diff --git a/lisp/emacs-lisp/package-vc.el b/lisp/emacs-lisp/package-vc.el index 8338e98d9f0..7cb4bfde51a 100644 --- a/lisp/emacs-lisp/package-vc.el +++ b/lisp/emacs-lisp/package-vc.el @@ -631,7 +631,7 @@ building documentation and marking the package as installed." (dolist (elc-file (directory-files-recursively lisp-dir (rx string-start - (not ".") (zero-or-more any) ".elc" + (not ".") (zero-or-more anychar) ".elc" string-end) nil (lambda (dir) diff --git a/lisp/pcmpl-rpm.el b/lisp/pcmpl-rpm.el index 239500c37dd..d3992f82227 100644 --- a/lisp/pcmpl-rpm.el +++ b/lisp/pcmpl-rpm.el @@ -404,7 +404,7 @@ STATUS should be one of --available or --installed." (while (pcase subcmd ((guard (pcomplete-match "\\`-" 0)) (if-let* (((pcomplete-match (rx bos "--what" (* (not "=")) "=" - (group (* any)) eos) + (group (* anychar)) eos) 0)) (stub (pcomplete-match-string 1 0))) (pcomplete-here (pcmpl-rpm--dnf-packages "--available") stub) diff --git a/test/lisp/emacs-lisp/package-vc-tests.el b/test/lisp/emacs-lisp/package-vc-tests.el index f118a871f99..27faf4acaba 100644 --- a/test/lisp/emacs-lisp/package-vc-tests.el +++ b/test/lisp/emacs-lisp/package-vc-tests.el @@ -989,7 +989,7 @@ car of ARGS (a symbol) to name of the package." (substring (cadr package-vc-tests-repository) 0 7)) - (one-or-more any) + (one-or-more anychar) "Second commit" line-end))) (should (bufferp incoming-buffer))