(read-file-local-variable): Include some

non-user-variables in the completion table (bug#4664).

(read-file-local-variable): Include some
non-user-variables in the completion table (bug#4664).
5c4634c1 · Stefan Monnier · 7f8b600a · 5c4634c1 · 5c4634c1
Commit 5c4634c1 authored Oct 07, 2009 by Stefan Monnier
Hide whitespace changes
Inline Side-by-side

Showing with 6 additions and 0 deletions

lisp/ChangeLog lisp/ChangeLog +5 -0

lisp/files-x.el lisp/files-x.el +1 -0

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+2009-10-07  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* files-x.el (read-file-local-variable): Include some
+	non-user-variables in the completion table (bug#4664).
+
 2009-10-07  Michael Albinus  <michael.albinus@gmx.de>

 	* net/tramp-cache.el (tramp-flush-connection-property): Add trace

--- a/lisp/files-x.el
+++ b/lisp/files-x.el
@@ -49,6 +49,7 @@ Intended to be used in the `interactive' spec of
 	   obarray
 	   (lambda (sym)
 	     (or (user-variable-p sym)
+                 (get sym 'safe-local-variable)
 		 (memq sym '(mode eval coding unibyte))))
 	   nil nil nil default nil))
    (and (stringp variable) (intern variable))))