aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/ChangeLog.122
-rw-r--r--lisp/files.el4
3 files changed, 7 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb3a907d6c3..4489d7e247f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
12008-02-25 Jason Rumney <jasonr@gnu.org>
2
3 * files.el (file-name-invalid-regexp): Fix octal/decimal confusion.
4
12008-02-25 Juri Linkov <juri@jurta.org> 52008-02-25 Juri Linkov <juri@jurta.org>
2 6
3 * isearch.el (isearch-fail): Use "RosyBrown1" for a light 7 * isearch.el (isearch-fail): Use "RosyBrown1" for a light
diff --git a/lisp/ChangeLog.12 b/lisp/ChangeLog.12
index e7666973521..82814f2226d 100644
--- a/lisp/ChangeLog.12
+++ b/lisp/ChangeLog.12
@@ -2595,7 +2595,7 @@
2595 * bookmark.el (bookmark-buffer-file-name): Abbreviate the bookmark 2595 * bookmark.el (bookmark-buffer-file-name): Abbreviate the bookmark
2596 path. Rewrite function in `cond' style for readability. 2596 path. Rewrite function in `cond' style for readability.
2597 2597
2598 Suggested by: Stephen Eglen <S.J.Eglen{_AT_}damtp.cam.ac.uk>. 2598 Suggested by Stephen Eglen <S.J.Eglen{_AT_}damtp.cam.ac.uk>.
2599 (The path shortening, that is, not the rearrangement.) 2599 (The path shortening, that is, not the rearrangement.)
2600 2600
26012007-01-15 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> 26012007-01-15 YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
diff --git a/lisp/files.el b/lisp/files.el
index 3950d5e7195..908bc95356b 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -226,12 +226,12 @@ have fast storage with limited space, such as a RAM disk."
226 (cond ((and (eq system-type 'ms-dos) (not (msdos-long-file-names))) 226 (cond ((and (eq system-type 'ms-dos) (not (msdos-long-file-names)))
227 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive 227 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive
228 "[+, ;=|<>\"?*]\\|\\[\\|\\]\\|" ; invalid characters 228 "[+, ;=|<>\"?*]\\|\\[\\|\\]\\|" ; invalid characters
229 "[\000-\031]\\|" ; control characters 229 "[\000-\037]\\|" ; control characters
230 "\\(/\\.\\.?[^/]\\)\\|" ; leading dots 230 "\\(/\\.\\.?[^/]\\)\\|" ; leading dots
231 "\\(/[^/.]+\\.[^/.]*\\.\\)")) ; more than a single dot 231 "\\(/[^/.]+\\.[^/.]*\\.\\)")) ; more than a single dot
232 ((memq system-type '(ms-dos windows-nt cygwin)) 232 ((memq system-type '(ms-dos windows-nt cygwin))
233 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive 233 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive
234 "[|<>\"?*\000-\031]")) ; invalid characters 234 "[|<>\"?*\000-\037]")) ; invalid characters
235 (t "[\000]")) 235 (t "[\000]"))
236 "Regexp recognizing file names which aren't allowed by the filesystem.") 236 "Regexp recognizing file names which aren't allowed by the filesystem.")
237 237