summaryrefslogtreecommitdiff
path: root/lisp/files-x.el
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2013-06-25 23:48:54 +0300
committerJuri Linkov <juri@jurta.org>2013-06-25 23:48:54 +0300
commite080a9d7307025e73c9682c201e60206f7b4e808 (patch)
tree8846a9d7031b6fa9d15bb946e459e3cb73c7801a /lisp/files-x.el
parentec64c2738515452c75a38c31537c2b495bb77c74 (diff)
downloademacs-e080a9d7307025e73c9682c201e60206f7b4e808.tar.gz
* lisp/files-x.el (read-file-local-variable-value): Add `default'.
Fixes: debbugs:14710
Diffstat (limited to 'lisp/files-x.el')
-rw-r--r--lisp/files-x.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files-x.el b/lisp/files-x.el
index c9ff931cd55..adc2b8b3bf3 100644
--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -90,7 +90,8 @@ Intended to be used in the `interactive' spec of
(minibuffer-completing-symbol t))
(read-from-minibuffer (format "Add %s with value: " variable)
nil read-expression-map t
- 'set-variable-value-history)))))
+ 'set-variable-value-history
+ default)))))
(defun read-file-local-variable-mode ()
"Read per-directory file-local variable's mode using completion.