mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

(read-file-local-variable-value):

Browse Source 
Provide default value only for bound variables.
This commit is contained in:
Juri Linkov 2009-10-11 23:53:22 +00:00
parent 585eedef91
commit 4d9b432332
2 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -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 (bug#4664).
2009-10-11 Michael Albinus <michael.albinus@gmx.de>
* net/tramp.el (tramp-local-host-p): Function shall return nil for

3
lisp/files-x.el
View File

@ -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.