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

Fixes: debbugs:15028

lisp/dired.el (dired-insert-directory): Revert change in 2013-06-21T12:24:37Z!lekktu@gmail.com.
Fixes: debbugs:15028
1d237bba · Juanma Barranquero · dc6c0eda · 1d237bba · 1d237bba
Commit 1d237bba authored Aug 06, 2013 by Juanma Barranquero
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 1 deletion

lisp/ChangeLog lisp/ChangeLog +5 -0

lisp/dired.el lisp/dired.el +1 -1

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+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).

--- 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