From 4d9b432332dbe48a7fd64ae24fcbf8a12232a8c2 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Sun, 11 Oct 2009 23:53:22 +0000 Subject: [PATCH] (read-file-local-variable-value): Provide default value only for bound variables. --- lisp/ChangeLog | 5 +++++ lisp/files-x.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bd1333af152..cb99af982e5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-10-11 Juri Linkov + + * files-x.el (read-file-local-variable-value): + Provide default value only for bound variables (bug#4664). + 2009-10-11 Michael Albinus * net/tramp.el (tramp-local-host-p): Function shall return nil for diff --git a/lisp/files-x.el b/lisp/files-x.el index 3ad3f90e407..8261df18b51 100644 --- a/lisp/files-x.el +++ b/lisp/files-x.el @@ -92,7 +92,8 @@ Intended to be used in the `interactive' spec of 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. -- 2.39.5