From 82c40dbfd5f1873fa461179bbf732e3dd9719578 Mon Sep 17 00:00:00 2001 From: czkmt Date: Wed, 26 Jun 2002 11:54:51 +0000 Subject: [PATCH] (imap-ssl-open-2): Do away with w32-related workaround I installed on 1999-12-28, i.e. also call `as-binary-process' in windows-nt. --- lisp/imap.el | 12 ++---------- 1 file changed, 2 insertions(+), 10 deletions(-) diff --git a/lisp/imap.el b/lisp/imap.el index 33f2d52..33bd7d2 100644 --- a/lisp/imap.el +++ b/lisp/imap.el @@ -604,16 +604,8 @@ If ARGS, PROMPT is used as an argument to `format'." process) (when (setq process (condition-case nil - (cond ((eq system-type 'windows-nt) - (let (selective-display - (coding-system-for-write 'binary) - (coding-system-for-read 'raw-text-dos) - (output-coding-system 'binary) - (input-coding-system 'raw-text-dos)) - (open-ssl-stream name buffer server port))) - (t - (as-binary-process - (open-ssl-stream name buffer server port)))) + (as-binary-process + (open-ssl-stream name buffer server port)) (error nil))) (with-current-buffer buffer (goto-char (point-min)) -- 1.7.10.4