* elmo-nntp.el (elmo-nntp-post): Fix for `elmo-nntp-default-stream-type'

[elisp/wanderlust.git] / elmo / elmo-nntp.el

diff --git a/elmo/elmo-nntp.el b/elmo/elmo-nntp.el
index d4933b3..ff3e29d 100644 (file)
--- a/elmo/elmo-nntp.el
+++ b/elmo/elmo-nntp.el
@@ -986,7 +986,9 @@ Don't cache if nil.")
                   :user elmo-nntp-default-user
                   :server hostname
                   :port elmo-nntp-default-port
-                  :stream-type elmo-nntp-default-stream-type)))
+                  :stream-type
+                  (elmo-get-network-stream-type
+                   elmo-nntp-default-stream-type))))
        response has-message-id)
     (save-excursion
       (set-buffer content-buf)