* test/automated/files.el (files-test-disable-local-variables): New test.

diff --git a/test/ChangeLog b/test/ChangeLog
index d330311e1d38451074ee89ecbe5a5c08012dae88..b4195ea7d586840f9021678a05b92f29d492ebe4 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,7 @@
+2012-08-10  Glenn Morris  <rgm@gnu.org>
+
+       * automated/files.el (files-test-disable-local-variables): New test.
+
 2012-08-08  Glenn Morris  <rgm@gnu.org>
 
        * automated/files.el: New file.

diff --git a/test/automated/files.el b/test/automated/files.el
index 43287ec0ed3f2449bb416d648970420ebf2ec15b..e43d8c32f8508cb0547ebc3671dd05f7611dc665 100644 (file)
--- a/test/automated/files.el
+++ b/test/automated/files.el
@@ -38,4 +38,15 @@
       (hack-local-variables)
       (should (eq files-test-var1 nil)))))
 
+(ert-deftest files-test-disable-local-variables ()
+  "Test that setting enable-local-variables to nil works."
+  (with-temp-buffer
+    (insert "text\n"
+            ";; Local Variables:\n"
+            ";; files-test-var1: t\n"
+            ";; End:\n")
+    (let ((enable-local-variables nil))
+      (hack-local-variables)
+      (should (eq files-test-var1 nil)))))
+
 ;;; files.el ends here