* elmo-net.el (elmo-network-open-session): Add user and stream-type for

 process-buffer name.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 31ec0d3..6b6784a 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,8 @@
 2000-08-23  Yuuichi Teranishi  <teranisi@gohome.org>
 
+       * elmo-net.el (elmo-network-open-session): Add user and
+       stream-type for process-buffer name.
+
        * elmo-pop3.el (elmo-network-initialize-session): Call
        buffer-disable-undo.
 

diff --git a/elmo/elmo-net.el b/elmo/elmo-net.el
index 16e4a9c..a2b823c 100644 (file)
--- a/elmo/elmo-net.el
+++ b/elmo/elmo-net.el
@@ -164,9 +164,13 @@ Returns a process object. if making session failed, returns nil."
           session
           (elmo-open-network-stream
            (elmo-network-session-name-internal session)
-           (format " *%s session to %s:%d"
-                   (elmo-network-session-name-internal session)
-                   host port)
+           (format " *%s session for %s@%s:%d%s"
+                   name
+                   user
+                   host
+                   port
+                   (or (elmo-network-stream-type-spec-string stream-type)
+                       ""))
            host port stream-type))
          (when (elmo-network-session-process-internal session)
            (elmo-network-initialize-session session)