egg-980404.

[elisp/egg.git] / egg-com.el

diff --git a/egg-com.el b/egg-com.el
index 12d9cc4..72d8045 100644 (file)
--- a/egg-com.el
+++ b/egg-com.el
@@ -748,11 +748,11 @@ v means 8-bit vector."
   (let ((start (point)))
     (while (not (search-forward "\0\0" nil t))
       (comm-accept-process-output proc))
-    (set s  (string-as-multibyte
-            (buffer-substring start
-                              (+ start
-                                 (decode-coding-region start (- (point) 2)
-                                                       egg-fixed-euc)))))))
+    (set s (string-as-multibyte
+           (buffer-substring start
+                             (+ start
+                                (decode-coding-region start (- (point) 2)
+                                                      egg-fixed-euc)))))))
 
 ;;; XXX should support other conversion (euc-kr, cns)
 (defsubst comm-unpack-mb-string (proc s)