* lisp/files-x.el (read-file-local-variable-value): Add `default'.

Fixes: debbugs:14710

lisp/ChangeLog

@@ -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  <larsi@gnus.org>
 
 	* net/eww.el (eww-make-unique-file-name): Create a unique file

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.