diff options
| author | Satoshi Taoka <taoka@FreeBSD.org> | 2000-02-21 05:13:49 +0000 |
|---|---|---|
| committer | Satoshi Taoka <taoka@FreeBSD.org> | 2000-02-21 05:13:49 +0000 |
| commit | 06a335b78808ac7f224e70af296dcee1760beb60 (patch) | |
| tree | 891bb4b462b05df0315f0442b50e269392e2b6c4 | |
| parent | 3655ead184ca5a667869c45f7a8576a009a9a945 (diff) | |
| download | ports-06a335b78808ac7f224e70af296dcee1760beb60.tar.gz ports-06a335b78808ac7f224e70af296dcee1760beb60.zip | |
Notes
| -rw-r--r-- | editors/mule-common/files/patch-ca | 26 | ||||
| -rw-r--r-- | textproc/coco/files/patch-ca | 26 |
2 files changed, 52 insertions, 0 deletions
diff --git a/editors/mule-common/files/patch-ca b/editors/mule-common/files/patch-ca new file mode 100644 index 000000000000..c3fdb4604aa6 --- /dev/null +++ b/editors/mule-common/files/patch-ca @@ -0,0 +1,26 @@ +Cannot view a gzpipped info file in mule Info-mode +when the next line is in ~/.emacs: + (set-default-process-coding-system *autoconv*unix *junet*) + +--- lisp/info.el.save Thu Jan 6 17:26:03 2000 ++++ lisp/info.el Wed Feb 19 15:17:14 2000 +@@ -204,12 +204,13 @@ + (jka-compr-installed-p) + (jka-compr-get-compression-info fullname)) + (setq decoder nil)) +- (insert-file-contents fullname visit) +- (if decoder +- (let ((buffer-read-only nil) +- (default-directory (or (file-name-directory fullname) +- default-directory))) +- (call-process-region (point-min) (point-max) decoder t t))))) ++ (cond (decoder ++ (let ((buffer-read-only nil) ++ (default-directory (or (file-name-directory fullname) ++ default-directory))) ++ (call-process decoder fullname t) )) ++ (t ++ (insert-file-contents fullname visit) )))) + + ;;;###autoload (add-hook 'same-window-buffer-names "*info*") + diff --git a/textproc/coco/files/patch-ca b/textproc/coco/files/patch-ca new file mode 100644 index 000000000000..c3fdb4604aa6 --- /dev/null +++ b/textproc/coco/files/patch-ca @@ -0,0 +1,26 @@ +Cannot view a gzpipped info file in mule Info-mode +when the next line is in ~/.emacs: + (set-default-process-coding-system *autoconv*unix *junet*) + +--- lisp/info.el.save Thu Jan 6 17:26:03 2000 ++++ lisp/info.el Wed Feb 19 15:17:14 2000 +@@ -204,12 +204,13 @@ + (jka-compr-installed-p) + (jka-compr-get-compression-info fullname)) + (setq decoder nil)) +- (insert-file-contents fullname visit) +- (if decoder +- (let ((buffer-read-only nil) +- (default-directory (or (file-name-directory fullname) +- default-directory))) +- (call-process-region (point-min) (point-max) decoder t t))))) ++ (cond (decoder ++ (let ((buffer-read-only nil) ++ (default-directory (or (file-name-directory fullname) ++ default-directory))) ++ (call-process decoder fullname t) )) ++ (t ++ (insert-file-contents fullname visit) )))) + + ;;;###autoload (add-hook 'same-window-buffer-names "*info*") + |