add functions to toggle remote local variables

diff --git a/lisp/toggle-local-vars/toggle-local-vars.el b/lisp/toggle-local-vars/toggle-local-vars.el
index a85c9ea4b170ff7b2437c29cf95a583dd35b8512..9d204544808348ecb938668cdd4bab571397740a 100644 (file)
--- a/lisp/toggle-local-vars/toggle-local-vars.el
+++ b/lisp/toggle-local-vars/toggle-local-vars.el
@@ -8,4 +8,15 @@
   (setq enable-local-variables nil)
   (message "disabled local variables"))
 
+(defun toggle-remote-local-vars-on ()
+  (interactive)
+  (setq enable-remote-dir-locals t
+        enable-local-variables t)
+  (message "enabled local variables"))
+
+(defun toggle-remote-local-vars-off ()
+  (interactive)
+  (setq enable-remote-dir-locals nil)
+  (message "disabled local variables"))
+
 (provide 'toggle-local-vars)