summaryrefslogtreecommitdiff
path: root/dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch
diff options
context:
space:
mode:
authorV3n3RiX <venerix@redcorelinux.org>2020-05-14 11:09:11 +0100
committerV3n3RiX <venerix@redcorelinux.org>2020-05-14 11:09:11 +0100
commitdeba8115d2c2af26df42966b91ef04ff4dd79cde (patch)
tree9a48f42594e1a9e6b2020d5535a784314434d7a7 /dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch
parent38423c67c8a23f6a1bc42038193182e2da3116eb (diff)
gentoo resync : 14.05.2020
Diffstat (limited to 'dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch')
-rw-r--r--dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch34
1 files changed, 34 insertions, 0 deletions
diff --git a/dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch b/dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch
new file mode 100644
index 000000000000..97acd86470eb
--- /dev/null
+++ b/dev-scheme/c-wrapper/files/c-wrapper-texinfo-6.7.patch
@@ -0,0 +1,34 @@
+--- a/doc/c-wrapper-ref.texi
++++ b/doc/c-wrapper-ref.texi
+@@ -14,7 +14,7 @@
+ @direntry
+ * c-wrapper reference: (c-wrapper-refj.info). A generic wrapper for C libraries.
+ @end direntry
+-@documentencoding euc-jp
++@documentencoding UTF-8
+ @c COMMON
+ @comment %**end of header
+
+--- a/doc/extract
++++ b/doc/extract
+@@ -138,8 +138,6 @@
+ ((en) (filter #/^@c EN$/ #/^@c JP$/))
+ ((jp) (filter #/^@c JP$/ #/^@c EN$/))))
+
+- (define outenc (if (eq? *lang* 'jp) 'euc-jp 'utf8))
+-
+ (unless (= (length a) 1) (usage))
+
+ (when (eq? *lang* 'jp)
+@@ -148,9 +146,9 @@
+ (with-input-from-file (car a)
+ (lambda ()
+ (if *outfile*
+- (with-output-to-file *outfile* do-it :encoding outenc)
++ (with-output-to-file *outfile* do-it :encoding 'utf8)
+ (let1 out (open-output-conversion-port
+- (current-output-port) outenc)
++ (current-output-port) 'utf8)
+ (with-output-to-port out do-it)
+ (close-output-port out))))
+ :encoding 'euc-jp)