X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-localnews.el;h=8d533e3ee7f24e1279d8b51ea25de2c8c8dce6a1;hb=f99a54273844588779955992f0d05d37536bceb5;hp=8468818d50d3e73e3b0104eaf0a0ca8b177709b2;hpb=51f9787799e1f8a5ad1f9cde0fd99489dae071c3;p=elisp%2Fwanderlust.git diff --git a/elmo/elmo-localnews.el b/elmo/elmo-localnews.el index 8468818..8d533e3 100644 --- a/elmo/elmo-localnews.el +++ b/elmo/elmo-localnews.el @@ -32,6 +32,11 @@ ;; (require 'elmo-localdir) +(defcustom elmo-localnews-folder-path "~/News" + "*Local news folder path." + :type 'directory + :group 'elmo) + (eval-and-compile (luna-define-class elmo-localnews-folder (elmo-localdir-folder) (group)) (luna-define-internal-accessors 'elmo-localnews-folder)) @@ -56,7 +61,7 @@ (elmo-localnews-folder-group-internal folder) (expand-file-name (symbol-name (elmo-folder-type-internal folder)) - elmo-msgdb-dir))) + elmo-msgdb-directory))) (luna-define-method elmo-folder-newsgroups ((folder elmo-localnews-folder)) (list (elmo-localnews-folder-group-internal folder)))