[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/files.el,v
From: |
Michael Cadilhac |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/files.el,v |
Date: |
Fri, 31 Aug 2007 13:29:34 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Michael Cadilhac <cadilhac> 07/08/31 13:29:34
Index: files.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/files.el,v
retrieving revision 1.926
retrieving revision 1.927
diff -u -b -r1.926 -r1.927
--- files.el 29 Aug 2007 05:28:02 -0000 1.926
+++ files.el 31 Aug 2007 13:29:34 -0000 1.927
@@ -1319,11 +1319,14 @@
(defun create-file-buffer (filename)
"Create a suitably named buffer for visiting FILENAME, and return it.
FILENAME (sans directory) is used unchanged if that name is free;
-otherwise a string <2> or <3> or ... is appended to get an unused name."
+otherwise a string <2> or <3> or ... is appended to get an unused name.
+Spaces at the start of FILENAME (sans directory) are removed."
(let ((lastname (file-name-nondirectory filename)))
(if (string= lastname "")
(setq lastname filename))
- (generate-new-buffer lastname)))
+ (save-match-data
+ (string-match "^ *\\(.*\\)" lastname)
+ (generate-new-buffer (match-string 1 lastname)))))
(defun generate-new-buffer (name)
"Create and return a buffer with a name based on NAME.
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Michael Albinus, 2007/08/05
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Michael Albinus, 2007/08/05
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/08/13
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Glenn Morris, 2007/08/21
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Glenn Morris, 2007/08/22
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Glenn Morris, 2007/08/23
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Glenn Morris, 2007/08/23
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Glenn Morris, 2007/08/24
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Juri Linkov, 2007/08/25
- [Emacs-diffs] Changes to emacs/lisp/files.el,v, Miles Bader, 2007/08/29
- [Emacs-diffs] Changes to emacs/lisp/files.el,v,
Michael Cadilhac <=