# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1254926011 0
# Node ID 1bfde4a3bd0571a4b01aedfd9984265f60e0c0d6
# Parent  7104b717bbb5fc922239128ae815ae21e63d5bbc
(read-file-local-variable): Include some
non-user-variables in the completion table (bug#4664).

diff -r 7104b717bbb5 -r 1bfde4a3bd05 lisp/ChangeLog
--- a/lisp/ChangeLog	Wed Oct 07 14:32:08 2009 +0000
+++ b/lisp/ChangeLog	Wed Oct 07 14:33:31 2009 +0000
@@ -1,3 +1,8 @@
+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
diff -r 7104b717bbb5 -r 1bfde4a3bd05 lisp/files-x.el
--- a/lisp/files-x.el	Wed Oct 07 14:32:08 2009 +0000
+++ b/lisp/files-x.el	Wed Oct 07 14:33:31 2009 +0000
@@ -49,6 +49,7 @@
 	   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))))