basic skeleton

nnmu.el

@@ -26,13 +26,43 @@
 ;; This package provides an `nnmu' backend for Gnus as an alternative
 ;; to `nnmaildir' or `nnnotmuch' which is also not a part of GNU Emacs.
 
+;; The documentation for most functions and variables has been
+;; intentionally left blank, instead refer to the Gnus manual.
+
 ;;; Code:
 
 (require 'nnheader)
 (require 'nnmaildir)
 (require 'nnoo)
 
+
+(defcustom nnmu-program
+  (or (executable-find "mu")
+      (cond
+       ((file-exists-p "/usr/sbin/mu") "/usr/sbin/mu")
+       ((file-exists-p "/usr/lib/mu") "/usr/lib/mu")
+       ((file-exists-p "/usr/ucblib/mu") "/usr/ucblib/mu")
+       (t "mu")))
+  "Path to the mu program."
+  :type 'file)
+
+(defcustom nnmu-muhome ""
+  "Path to the mu database"
+  :type 'directory)
+
+
 (nnoo-declare nnmu nnmaildir)
 (nnoo-define-basics nnmu)
 
+
+(defvar nnmu--current-group nil)
+(defvar nnmu--current-server nil)
+
+(deffoo nnmu-retrieve-headers (articles &optional group server fetch-old)
+  (or group (setq group nnmu--current-group))
+  )
+
+
+(gnus-declare-backend "nnmu" 'post-mail 'address)
+
 (provide 'nnmu)