; * lisp/emacs-lisp/package.el (package-load-all-descriptors): Use \`

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 27324f2b9b455aeffe79998f8b98bc95c0310a29..a7bcdd214cb0a29310c555ec0b74ce18828adcde 100644 (file)
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -741,7 +741,7 @@ description file containing a call to `define-package', which
 updates `package-alist'."
   (dolist (dir (cons package-user-dir package-directory-list))
     (when (file-directory-p dir)
-      (dolist (pkg-dir (directory-files dir t "^[^.]" t))
+      (dolist (pkg-dir (directory-files dir t "\\`[^.]" t))
         (when (file-directory-p pkg-dir)
           (package-load-descriptor pkg-dir))))))