From: yoichi <yoichi>
Date: Sun, 18 Apr 2004 03:35:11 +0000 (+0000)
Subject: * elmo-vars.el (elmo-network-stream-type-alist): Add direct.
X-Git-Tag: wl-2_11_26~3
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4714b47d522eb2cd84968a3b244bf187cd8e16ae;p=elisp%2Fwanderlust.git

* elmo-vars.el (elmo-network-stream-type-alist): Add direct.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 3330361..9a29986 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,7 @@
 2004-04-18  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
+	* elmo-vars.el (elmo-network-stream-type-alist): Add direct.
+
 	* elmo-util.el (elmo-msgdb-get-message-id-from-buffer): Don't use
 	md5's 4th and 5th argument (non-existent in flim one).
 
diff --git a/elmo/elmo-vars.el b/elmo/elmo-vars.el
index b6f509d..3adb0f5 100644
--- a/elmo/elmo-vars.el
+++ b/elmo/elmo-vars.el
@@ -336,7 +336,8 @@ If function, return value of function.")
 (defvar elmo-network-stream-type-alist
   '(("!"      ssl       ssl      open-ssl-stream)
     ("!!"     starttls  starttls starttls-open-stream)
-    ("!socks" socks     socks    socks-open-network-stream))
+    ("!socks" socks     socks    socks-open-network-stream)
+    ("!direct" direct   direct   open-network-stream))
   "An alist of (SPEC-STRING SYMBOL FEATURE OPEN-STREAM-FUNCTION).
 SPEC-STRING is a string for stream-type spec (it must start with '!').
 SYMBOL is a symbol which indicates the name of the stream type.