diff lisp/dired.el @ 51846:81601d0477e1

(dired-move-to-filename-regexp): Allow quote in months.

--- a/lisp/dired.el	Wed Jul 09 15:10:47 2003 +0000
+++ b/lisp/dired.el	Wed Jul 09 15:52:59 2003 +0000
@@ -1565,9 +1565,11 @@
 
 (defvar dired-move-to-filename-regexp
   (let* ((l "\\([A-Za-z]\\|[^\0-\177]\\)")
+	 (l-or-quote "\\([A-Za-z']\\|[^\0-\177]\\)")
 	 ;; In some locales, month abbreviations are as short as 2 letters,
 	 ;; and they can be followed by ".".
-	 (month (concat l l "+\\.?"))
+	 ;; In Breton, a month name  can include a quote character.
+	 (month (concat l-or-quote l-or-quote "+\\.?"))
 	 (s " ")
 	 (yyyy "[0-9][0-9][0-9][0-9]")
 	 (dd "[ 0-3][0-9]")