Use `imap-process-connection-type' for 'shell' streams as well as Kerberos, SSL,...

* imap.el (imap-shell-open, imap-process-connection-type): Use
imap-process-connection-type for 'shell' streams as well as
Kerberos, SSL, other subprocesses.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b63c256..116a3d0 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2011-03-28  Brian T. Sniffen  <bsniffen@akamai.com>  (tiny change)
+
+       * imap.el (imap-shell-open, imap-process-connection-type): Use
+       imap-process-connection-type for 'shell' streams as well as
+       Kerberos, SSL, other subprocesses.
+
 2011-03-26  Chong Yidong  <cyd@stupidchicken.com>
 
        * proto-stream.el: Changes preparatory to merging open-protocol-stream

diff --git a/lisp/imap.el b/lisp/imap.el
index 6d80b97..f4af03f 100644 (file)
--- a/lisp/imap.el
+++ b/lisp/imap.el
@@ -211,7 +211,7 @@ until a successful connection is made."
   :type '(repeat string))
 
 (defcustom imap-process-connection-type nil
-  "*Value for `process-connection-type' to use for Kerberos4, GSSAPI and SSL.
+  "*Value for `process-connection-type' to use for Kerberos4, GSSAPI, shell, and SSL.
 The `process-connection-type' variable controls the type of device
 used to communicate with subprocesses.  Values are nil to use a
 pipe, or t or `pty' to use a pty.  The value has no effect if the
@@ -770,6 +770,7 @@ sure of changing the value of `foo'."
       (let* ((port (or port imap-default-port))
             (coding-system-for-read imap-coding-system-for-read)
             (coding-system-for-write imap-coding-system-for-write)
+             (process-connection-type imap-process-connection-type)
             (process (start-process
                       name buffer shell-file-name shell-command-switch
                       (format-spec