X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=elmo%2Felmo-localnews.el;h=9287ec42f7f88a6a066f4b9503d305fb5c5cefa7;hb=10518221da70c6e7ffc66352ee6a3e1036bd5133;hp=67a3a6ad049c05728553d3dabeef95ddc1228497;hpb=1e366a559be4aec4ad4d3cf3e954b8e62a20d2f3;p=elisp%2Fwanderlust.git diff --git a/elmo/elmo-localnews.el b/elmo/elmo-localnews.el index 67a3a6a..9287ec4 100644 --- a/elmo/elmo-localnews.el +++ b/elmo/elmo-localnews.el @@ -1,10 +1,11 @@ ;;; elmo-localnews.el -- Local News Spool Interface for ELMO. -;; Copyright 1998,1999,2000 OKUNISHI Fujikazu -;; Yuuichi Teranishi +;; Copyright (C) 1998,1999,2000 OKUNISHI Fujikazu +;; Copyright (C) 1998,1999,2000 Yuuichi Teranishi ;; Author: OKUNISHI Fujikazu -;; Time-stamp: <2000-01-24 12:20:07 teranisi> +;; Yuuichi Teranishi +;; Keywords: mail, net news ;; This file is part of ELMO (Elisp Library for Message Orchestration). @@ -59,7 +60,7 @@ (elmo-localnews-as-newsdir (elmo-localdir-delete-msgs dir number))) -(defun elmo-localnews-read-msg (spec number outbuf) +(defun elmo-localnews-read-msg (spec number outbuf &optional msgdb unread) (elmo-localnews-as-newsdir (elmo-localdir-read-msg spec number outbuf))) @@ -122,12 +123,14 @@ (elmo-localdir-get-msg-filename spec number loc-alist))) (defalias 'elmo-localnews-sync-number-alist 'elmo-generic-sync-number-alist) -(defalias 'elmo-localnews-list-folder-unread +(defalias 'elmo-localnews-list-folder-unread 'elmo-generic-list-folder-unread) (defalias 'elmo-localnews-list-folder-important 'elmo-generic-list-folder-important) (defalias 'elmo-localnews-commit 'elmo-generic-commit) +(defalias 'elmo-localnews-folder-diff 'elmo-generic-folder-diff) -(provide 'elmo-localnews) +(require 'product) +(product-provide (provide 'elmo-localnews) (require 'elmo-version)) ;;; elmo-localnews.el ends here