lisp/dired.el (dired-insert-directory): Revert change in 2013-06-21T12:24:37Z!lekktu@gmail.com.

Fixes: debbugs:15028

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ad7d82c30d7..c3f908b83ae 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-08-06  Juanma Barranquero  <lekktu@gmail.com>
+
+        * dired.el (dired-insert-directory): Revert change in 2013-06-21T12:24:37Z!lekktu@gmail.com
+        to use looking-at-p instead of looking-at.  (Bug#15028)
+
 2013-08-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         Revert introduction of isearch-filter-predicates (bug#14714).
diff --git a/lisp/dired.el b/lisp/dired.el
index c44cf574889..48f1b463f4a 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -1225,7 +1225,7 @@ see `dired-use-ls-dired' for more details.")
       (save-excursion
         (goto-char opoint)
         (when (and (or hdr wildcard)
-                   (not (and (looking-at-p "^  \\(.*\\):$")
+                   (not (and (looking-at "^  \\(.*\\):$")
                              (file-name-absolute-p (match-string 1)))))
           ;; Note that dired-build-subdir-alist will replace the name
           ;; by its expansion, so it does not matter whether what we insert