(defgroup mymail ()
"Command to visit a folder built on-the-fly with mymail"
- :version "0.9.8")
+ :version "0.9.10")
(defcustom mymail/default-additional-search-requests ""
"Comma-separated list of search requests to add to any search"
search-args))
0)
(vm-visit-folder mbox-name t)
- (message "mymail failed. See /tmp/mymail.err"))
+
+ ;; (message "mymail failed. See /tmp/mymail.err"))
+
+ (message (with-temp-buffer
+ (insert-file-contents "/tmp/mymail.err")
+ (replace-string "\n" " ")
+ (buffer-string)))
+ )
))