[Emacs-diffs] trunk r113179: * lisp/files-x.el (read-file-local-variable-value): Add `default'.

[Juri Linkov]

------------------------------------------------------------
revno: 113179
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/14710
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Tue 2013-06-25 23:48:54 +0300
message:
  * lisp/files-x.el (read-file-local-variable-value): Add `default'.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/files-x.el                filesx.el-20091113204419-o5vbwnq5f7feedwu-10917

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-06-25 20:23:10 +0000
+++ b/lisp/ChangeLog    2013-06-25 20:48:54 +0000
@@ -3,6 +3,9 @@
        * files-x.el (modify-dir-local-variable): Change the header comment
        in the file with directory local variables.  (Bug#14692)
 
+       * files-x.el (read-file-local-variable-value): Add `default'.
+       (Bug#14710)
+
 2013-06-25  Lars Magne Ingebrigtsen  <address@hidden>
 
        * net/eww.el (eww-make-unique-file-name): Create a unique file

=== modified file 'lisp/files-x.el'
--- a/lisp/files-x.el   2013-06-25 20:23:10 +0000
+++ b/lisp/files-x.el   2013-06-25 20:48:54 +0000
@@ -90,7 +90,8 @@
           (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.