🚀 go-pugleaf

This patch makes vm-visit-when-saving be evalled before being examined.
I then do:
	(setq vm-visit-when-saving '(string-match "\\.Z$" folder))

This is a kludge (go dynamic binding!), but it works.  Some of my folders
are compressed, and some are not.  I do not want to be royally screwed when
saving to compressed folders, which a vm-visit-when-saving setting other
than t will do.  I also do not want to wait for vm to read and parse an
uncompressed folder when I save something to it.

cd /usr/local/lib/elisp/vm-5.32beta/
diff -u /usr/local/lib/elisp/vm-5.32beta/vm-save.el.\~1\~ /usr/local/lib/elisp/vm-5.32beta/vm-save.el
--- /usr/local/lib/elisp/vm-5.32beta/vm-save.el.~1~	Wed Mar  4 02:33:32 1992
+++ /usr/local/lib/elisp/vm-5.32beta/vm-save.el	Mon Mar 16 01:08:32 1992
@@ -144,7 +144,8 @@
 			    dir default nil )
 	  (read-file-name "Save in folder: " dir nil nil))))
     (prefix-numeric-value current-prefix-arg)))
-  (let (unexpanded-folder)
+  (let ((vm-visit-when-saving (eval vm-visit-when-saving))
+	 unexpanded-folder)
     (setq unexpanded-folder folder)
     (vm-select-folder-buffer)
     (vm-check-for-killed-summary)

diff exited abnormally with code 1 at Mon Mar 16 02:08:47