* mm updates (WIP)

2011-09-20 00:20:59 +03:00
parent 2d52e671cc
commit e685f6b7e0
4 changed files with 93 additions and 16 deletions
--- a/toys/mm/mm.el
+++ b/toys/mm/mm.el
@ -67,9 +67,16 @@ PATH, you can specifiy the full path."
  :group 'mm
  :safe 'stringp)

+(defcustom mm/attachment-dir (expand-file-name "~/")
+  "Default directory for saving attachments."
+  :type 'string
+  :group 'mm
+  :safe 'stringp)
+
 (defvar mm/debug nil
  "When set to non-nil, log debug information to the *mm-log* buffer.")

+
 ;; Folders

 (defgroup mm/folders nil
@ -196,8 +203,6 @@ be sure it no longer matches)."



-
-
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; internal variables / constant
 (defconst mm/mm-buffer-name "*mm*"