* elmo-util.el (elmo-string-partial-p): Removed unused function.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index e07604e..50461b3 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-19  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+       * elmo-util.el (elmo-string-partial-p): Removed unused function.
+
 2004-02-18  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
        * elmo.el (elmo-folder-synchronize): Fix description of the return

diff --git a/elmo/elmo-util.el b/elmo/elmo-util.el
index 7021069..e5d23fe 100644 (file)
--- a/elmo/elmo-util.el
+++ b/elmo/elmo-util.el
@@ -355,9 +355,6 @@ Return value is a cons cell of (STRUCTURE . REST)"
          (nconc list rest))
       (nconc list (list element)))))
 
-(defun elmo-string-partial-p (string)
-  (and (stringp string) (string-match "message/partial" string)))
-
 (defun elmo-get-file-string (filename &optional remove-final-newline)
   (elmo-set-work-buf
    (let (insert-file-contents-pre-hook   ; To avoid autoconv-xmas...