Commit 984096ed authored by Chong Yidong's avatar Chong Yidong

Fix byte compilation warning in files testsuite.

* automated/files.el (file-test--do-local-variables-test): Avoid
compilation warning message.
parent 8ea41ea9
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
......
......@@ -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)))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment