diff --git a/lisp/dired.el b/lisp/dired.el
index 43e1e8cfea9..84c6e42adbd 100644
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -185,7 +185,7 @@ directory name and the cdr is the actual files to list.")
 	       "-[-r][-w].[-r][-w][xs][-r][-w]."
 	       "-[-r][-w].[-r][-w].[-r][-w][xst]")
 	     "\\|"))
-(defvar dired-re-perms "-[-r][-w].[-r][-w].[-r][-w].")
+(defvar dired-re-perms "[-dl][-r][-w].[-r][-w].[-r][-w].")
 (defvar dired-re-dot "^.* \\.\\.?$")
 
 ;; The subdirectory names in this list are expanded.