Fix byte compilation warning in files testsuite.

* automated/files.el (file-test--do-local-variables-test): Avoid
compilation warning message.

2 files changed, 10 insertions, 5 deletions

diff --git a/test/ChangeLog b/test/ChangeLog
index 7e893ba6768..651453566f2 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,8 @@
+2013-02-03  Chong Yidong  <cyd@gnu.org>
+
+        * automated/files.el (file-test--do-local-variables-test): Avoid
+        compilation warning message.
+
 2013-01-27  Dmitry Gutov  <dgutov@yandex.ru>
 
         * automated/ruby-mode-tests.el
diff --git a/test/automated/files.el b/test/automated/files.el
index 8712d1f620e..f2d2192a420 100644
--- a/test/automated/files.el
+++ b/test/automated/files.el
@@ -23,9 +23,9 @@
 
 ;; Set to t if the local variable was set, `query' if the query was
 ;; triggered.
-(defvar files-test-result)
+(defvar files-test-result nil)
 
-(defvar files-test-safe-result)
+(defvar files-test-safe-result nil)
 (put 'files-test-safe-result 'safe-local-variable 'booleanp)
 
 (defun files-test-fun1 ()
@@ -123,11 +123,11 @@ form.")
 (defun file-test--do-local-variables-test (str test-settings)
   (with-temp-buffer
     (insert str)
+    (setq files-test-result nil
+          files-test-safe-result nil)
     (let ((enable-local-variables (nth 0 test-settings))
           (enable-local-eval      (nth 1 test-settings))
-          (files-test-result nil)
-          (files-test-queried nil)
-          (files-test-safe-result nil))
+          (files-test-queried nil))
       (hack-local-variables)
       (eval (nth 2 test-settings)))))