From: kaoru <kaoru>
Date: Thu, 19 Feb 2004 01:17:48 +0000 (+0000)
Subject: * elmo-util.el (elmo-string-partial-p): Removed unused function.
X-Git-Tag: wl-2_11_25~58
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b5edc99b23521b790554f61def0aa0354745db06;p=elisp%2Fwanderlust.git

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

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index e07604e..50461b3 100644
--- 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
--- 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...