diff options
Diffstat (limited to 'editors/tamago/files/patch-egg-sj3.el')
| -rw-r--r-- | editors/tamago/files/patch-egg-sj3.el | 21 |
1 files changed, 18 insertions, 3 deletions
diff --git a/editors/tamago/files/patch-egg-sj3.el b/editors/tamago/files/patch-egg-sj3.el index d73b8dede330..1b0814534ea5 100644 --- a/editors/tamago/files/patch-egg-sj3.el +++ b/editors/tamago/files/patch-egg-sj3.el @@ -1,6 +1,6 @@ --- egg/sj3.el.orig 2015-01-31 19:23:34.000000000 +0900 -+++ egg/sj3.el 2015-01-31 19:25:52.000000000 +0900 -@@ -146,7 +146,7 @@ ++++ egg/sj3.el 2015-02-02 00:33:30.000000000 +0900 +@@ -146,11 +146,10 @@ (setq proc (open-network-stream "SJ3" buf hostname sj3-server-port)) ((error quit) (egg-error "failed to connect sj3 server"))) @@ -8,4 +8,19 @@ + (set-process-query-on-exit-flag proc nil) (set-process-coding-system proc 'binary 'binary) (set-marker-insertion-type (process-mark proc) t) - (save-excursion +- (save-excursion +- (set-buffer buf) ++ (with-current-buffer buf + (erase-buffer) + (buffer-disable-undo) + (set-buffer-multibyte nil)) +@@ -177,8 +176,7 @@ + ;; (let* ((buf (generate-new-buffer " *SJ3*")) + ;; (msg-form "SJ3: connecting to sj3serv at %s...") + ;; hostname proc result msg) +-;; (save-excursion +-;; (set-buffer buf) ++;; (with-current-buffer buf + ;; (erase-buffer) + ;; (buffer-disable-undo) + ;; (setq enable-multibyte-characters nil)) |