aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSatoshi Taoka <taoka@FreeBSD.org>2000-02-21 05:13:49 +0000
committerSatoshi Taoka <taoka@FreeBSD.org>2000-02-21 05:13:49 +0000
commit06a335b78808ac7f224e70af296dcee1760beb60 (patch)
tree891bb4b462b05df0315f0442b50e269392e2b6c4
parent3655ead184ca5a667869c45f7a8576a009a9a945 (diff)
downloadports-06a335b78808ac7f224e70af296dcee1760beb60.tar.gz
ports-06a335b78808ac7f224e70af296dcee1760beb60.zip
Notes
-rw-r--r--editors/mule-common/files/patch-ca26
-rw-r--r--textproc/coco/files/patch-ca26
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*")
+