From: Kevin Ryde <user42@zip.com.au>
Date: Mon, 17 Dec 2012 15:51:49 +0000 (-0500)
Subject: * lisp/files.el (auto-save-file-name-p): Use \` and \'.
X-Git-Tag: emacs-24.3.90~173^2~7^2~565
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=191562422a2d6d54214e24c349a471ac21ebf178;p=emacs.git

* lisp/files.el (auto-save-file-name-p): Use \` and \'.

Fixes: debbugs:13186
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 26570fc7e90..464ff7e084a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2012-12-17  Kevin Ryde  <user42@zip.com.au>
+
+	* files.el (auto-save-file-name-p): Use \` and \' (bug#13186).
+
 2012-12-17  Michael Albinus  <michael.albinus@gmx.de>
 
 	Add support for preserving ACL entries of files.
@@ -5,34 +9,34 @@
 	* net/tramp.el (tramp-file-name-for-operation): Add `file-acl' and
 	`set-file-acl' handlers.
 
-	* net/tramp-adb.el (tramp-adb-handle-copy-file): Handle
-	PRESERVE-EXTENDED-ATTRIBUTES.
+	* net/tramp-adb.el (tramp-adb-handle-copy-file):
+	Handle PRESERVE-EXTENDED-ATTRIBUTES.
 
-	* net/tramp-compat.el (tramp-compat-copy-file): Handle
-	PRESERVE-EXTENDED-ATTRIBUTES.
+	* net/tramp-compat.el (tramp-compat-copy-file):
+	Handle PRESERVE-EXTENDED-ATTRIBUTES.
 
-	* net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist): Add
-	`file-acl' and `set-file-acl' handlers.
-	(tramp-gvfs-handle-copy-file): Handle
-	PRESERVE-EXTENDED-ATTRIBUTES.
-	(tramp-gvfs-handle-file-acl, tramp-gvfs-handle-set-file-acl): New
-	defuns.
+	* net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
+	Add `file-acl' and `set-file-acl' handlers.
+	(tramp-gvfs-handle-copy-file):
+	Handle PRESERVE-EXTENDED-ATTRIBUTES.
+	(tramp-gvfs-handle-file-acl, tramp-gvfs-handle-set-file-acl):
+	New defuns.
 
-	* net/tramp-sh.el (tramp-sh-file-name-handler-alist): Add
-	`file-acl' and `set-file-acl' handlers.
+	* net/tramp-sh.el (tramp-sh-file-name-handler-alist):
+	Add `file-acl' and `set-file-acl' handlers.
 	(tramp-remote-acl-p, tramp-sh-handle-file-acl)
 	(tramp-sh-handle-set-file-acl): New defuns.
-	(tramp-sh-handle-copy-file, tramp-do-copy-or-rename-file): Handle
-	PRESERVE-EXTENDED-ATTRIBUTES.
+	(tramp-sh-handle-copy-file, tramp-do-copy-or-rename-file):
+	Handle PRESERVE-EXTENDED-ATTRIBUTES.
 
-	* net/tramp-smb.el (tramp-smb-file-name-handler-alist): Add
-	`file-acl' and `set-file-acl' handlers.
+	* net/tramp-smb.el (tramp-smb-file-name-handler-alist):
+	Add `file-acl' and `set-file-acl' handlers.
 	(tramp-smb-handle-copy-file): Handle PRESERVE-EXTENDED-ATTRIBUTES.
 
 2012-12-17  Kelly Dean  <kellydeanch@yahoo.com> (tiny change)
 
 	* help-macro.el (make-help-screen): Instead of switch-to-buffer
-	use pop-to-buffer with NORECORD argument t.  As buffer name use
+	use pop-to-buffer with NORECORD argument t.  As buffer name, use
 	*Metahelp* with a leading space (Bug#13190).
 
 2012-12-16  Romain Francoise  <romain@orebokech.com>
@@ -101,8 +105,8 @@
 
 2012-12-14  Julien Danjou  <julien@danjou.info>
 
-	* progmodes/sql.el (sql-mode-postgres-font-lock-keywords): Update
-	keywords list, data type and PL/pgSQL.
+	* progmodes/sql.el (sql-mode-postgres-font-lock-keywords):
+	Update keywords list, data type and PL/pgSQL.
 
 2012-12-14  Dave Abrahams  <dave@boostpro.com>
 
diff --git a/lisp/files.el b/lisp/files.el
index 3f29468e2d1..f076530fbc8 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5717,7 +5717,7 @@ See also `auto-save-file-name-p'."
 (defun auto-save-file-name-p (filename)
   "Return non-nil if FILENAME can be yielded by `make-auto-save-file-name'.
 FILENAME should lack slashes.  You can redefine this for customization."
-  (string-match "^#.*#$" filename))
+  (string-match "\\`#.*#\\'" filename))
 
 (defun wildcard-to-regexp (wildcard)
   "Given a shell file name pattern WILDCARD, return an equivalent regexp.