From 6d0ab031935cd9142cbd95dc6cea7519817b5aad Mon Sep 17 00:00:00 2001 From: hayashi Date: Mon, 9 Jul 2001 07:05:30 +0000 Subject: [PATCH] Use binary instead of no-conversion. --- ChangeLog | 8 ++++++++ egg/canna.el | 2 +- egg/sj3.el | 4 ++-- egg/wnn.el | 2 +- egg/wnnrpc.el | 8 ++++---- 5 files changed, 16 insertions(+), 8 deletions(-) diff --git a/ChangeLog b/ChangeLog index 72b27c3..b2b8aa9 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,13 @@ 2001-07-09 Yoshiki Hayashi + * canna.el (canna-open): Use binary instead of no-conversion. + * sj3.el (sj3-open): Ditto. + * wnn.el (wnn-open): Ditto. + * wnnrpc.el (wnnrpc-with-temp-buffer): Ditto. + (wnnrpc-with-write-file): Ditto. + +2001-07-09 Yoshiki Hayashi + * egg-cnv.el (egg-make-bunsetsu): Add start-open property. * its.el (its-put-cursor): Ditto. diff --git a/egg/canna.el b/egg/canna.el index d6ab041..13655a2 100644 --- a/egg/canna.el +++ b/egg/canna.el @@ -345,7 +345,7 @@ katakana to candidates list. NOSTUDY specifies not study." ((error quit)))) (when proc (process-kill-without-query proc) - (set-process-coding-system proc 'no-conversion 'no-conversion) + (set-process-coding-system proc 'binary 'binary) (set-process-sentinel proc 'canna-comm-sentinel) (set-marker-insertion-type (process-mark proc) t) (setq result (cannarpc-open proc user-name)) ;; result is context diff --git a/egg/sj3.el b/egg/sj3.el index 61d7249..e5e5264 100644 --- a/egg/sj3.el +++ b/egg/sj3.el @@ -147,7 +147,7 @@ Don't specify the optional arguments in normal use." ((error quit) (egg-error "failed to connect sj3 server"))) (process-kill-without-query proc) - (set-process-coding-system proc 'no-conversion 'no-conversion) + (set-process-coding-system proc 'binary 'binary) (set-marker-insertion-type (process-mark proc) t) (save-excursion (set-buffer buf) @@ -198,7 +198,7 @@ Don't specify the optional arguments in normal use." ;; (if proc ;; (progn ;; (process-kill-without-query proc) -;; (set-process-coding-system proc 'no-conversion 'no-conversion) +;; (set-process-coding-system proc 'binary 'binary) ;; (set-marker-insertion-type (process-mark proc) t) ;; ;; Initialize dictionaries ;; (setq sj3-sys-dict-list nil) diff --git a/egg/wnn.el b/egg/wnn.el index 18b392c..3bebcf9 100644 --- a/egg/wnn.el +++ b/egg/wnn.el @@ -1246,7 +1246,7 @@ Return the list of bunsetsu." ((error quit)))) (when proc (process-kill-without-query proc) - (set-process-coding-system proc 'no-conversion 'no-conversion) + (set-process-coding-system proc 'binary 'binary) (set-process-sentinel proc 'wnn-comm-sentinel) (set-marker-insertion-type (process-mark proc) t) (setq result (wnnrpc-open proc myname user-name)) diff --git a/egg/wnnrpc.el b/egg/wnnrpc.el index 8fcc98d..1d651c5 100644 --- a/egg/wnnrpc.el +++ b/egg/wnnrpc.el @@ -1454,16 +1454,16 @@ HINSHI and FUZOKUGO are information of preceding bunsetsu." (defmacro wnnrpc-with-temp-buffer (&rest body) `(with-temp-buffer - (let ((coding-system-for-read 'no-conversion) - (coding-system-for-write 'no-conversion)) + (let ((coding-system-for-read 'binary) + (coding-system-for-write 'binary)) (set-buffer-multibyte nil) ,@body))) (defmacro wnnrpc-with-write-file (filename error-handler &rest body) `(condition-case error (with-temp-file ,filename - (let ((coding-system-for-read 'no-conversion) - (coding-system-for-write 'no-conversion)) + (let ((coding-system-for-read 'binary) + (coding-system-for-write 'binary)) (set-buffer-multibyte nil) ,@body)) (file-error ,error-handler))) -- 1.7.10.4