[Emacs-diffs] /srv/bzr/emacs/trunk r101084: * lisp/progmodes/etags.el (tags-file-name): Mark safe if stringp (Bug#6733).

[Chong Yidong]

------------------------------------------------------------
revno: 101084
author: Tom Tromey <address@hidden>
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2010-08-14 19:01:42 -0400
message:
  * lisp/progmodes/etags.el (tags-file-name): Mark safe if stringp (Bug#6733).
modified:
  lisp/ChangeLog
  lisp/progmodes/etags.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2010-08-14 15:41:22 +0000
+++ b/lisp/ChangeLog    2010-08-14 23:01:42 +0000
@@ -1,3 +1,8 @@
+2010-08-14  Tom Tromey  <address@hidden>
+
+       * progmodes/etags.el (tags-file-name): Mark safe if stringp
+       (Bug#6733).
+
 2010-08-14  Eli Zaretskii  <address@hidden>
 
        * mouse.el (mouse-yank-primary): Fix mouse-2 on MS-Windows and

=== modified file 'lisp/progmodes/etags.el'
--- a/lisp/progmodes/etags.el   2010-05-01 01:08:43 +0000
+++ b/lisp/progmodes/etags.el   2010-08-14 23:01:42 +0000
@@ -40,6 +40,7 @@
 Use the `etags' program to make a tags table file.")
 ;; Make M-x set-variable tags-file-name like M-x visit-tags-table.
 ;;;###autoload (put 'tags-file-name 'variable-interactive (purecopy "fVisit 
tags table: "))
+;;;###autoload (put 'tags-file-name 'safe-local-variable 'stringp)
 
 (defgroup etags nil "Tags tables."
   :group 'tools)