changeset 105555:627cf97fdea2

(read-file-local-variable-value): Provide default value only for bound variables.
author Juri Linkov <juri@jurta.org>
date Sun, 11 Oct 2009 23:50:38 +0000
parents 59dc4314dfa4
children 9926dd71dc30
files lisp/ChangeLog lisp/files-x.el
diffstat 2 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Oct 11 15:01:27 2009 +0000
+++ b/lisp/ChangeLog	Sun Oct 11 23:50:38 2009 +0000
@@ -1,3 +1,8 @@
+2009-10-11  Juri Linkov  <juri@jurta.org>
+
+	* files-x.el (read-file-local-variable-value):
+	Provide default value only for bound variables.
+
 2009-10-11  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-local-host-p): Function shall return nil for
--- a/lisp/files-x.el	Sun Oct 11 15:01:27 2009 +0000
+++ b/lisp/files-x.el	Sun Oct 11 23:50:38 2009 +0000
@@ -92,7 +92,8 @@
 			 nil 'set-variable-value-history
 			 (format "%S"
 				 (cond ((eq variable 'unibyte) t)
-				       (t (symbol-value variable))))))))))
+				       ((boundp variable)
+					(symbol-value variable))))))))))
 
 (defun read-file-local-variable-mode ()
   "Read per-directory file-local variable's mode using completion.