| 1 |
commit: 1b45410033de7e30b16d546f3a27c16f9f64339f |
| 2 |
Author: Akinori Hattori <hattya <AT> gentoo <DOT> org> |
| 3 |
AuthorDate: Thu Jun 30 13:57:20 2022 +0000 |
| 4 |
Commit: Akinori Hattori <hattya <AT> gentoo <DOT> org> |
| 5 |
CommitDate: Thu Jun 30 13:57:20 2022 +0000 |
| 6 |
URL: https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=1b454100 |
| 7 |
|
| 8 |
mail-filter/scmail: fix tests with >=dev-scheme/gauche-0.9.10 |
| 9 |
|
| 10 |
Package-Manager: Portage-3.0.30, Repoman-3.0.3 |
| 11 |
Signed-off-by: Akinori Hattori <hattya <AT> gentoo.org> |
| 12 |
|
| 13 |
.../scmail/files/scmail-gauche-0.9.10.patch | 22 ++++++++++++++++++++++ |
| 14 |
mail-filter/scmail/scmail-1.3.ebuild | 1 + |
| 15 |
2 files changed, 23 insertions(+) |
| 16 |
|
| 17 |
diff --git a/mail-filter/scmail/files/scmail-gauche-0.9.10.patch b/mail-filter/scmail/files/scmail-gauche-0.9.10.patch |
| 18 |
new file mode 100644 |
| 19 |
index 000000000000..ab6f5e04d2f6 |
| 20 |
--- /dev/null |
| 21 |
+++ b/mail-filter/scmail/files/scmail-gauche-0.9.10.patch |
| 22 |
@@ -0,0 +1,22 @@ |
| 23 |
+--- a/scmail/mail.scm |
| 24 |
++++ b/scmail/mail.scm |
| 25 |
+@@ -202,7 +202,7 @@ |
| 26 |
+ (send-command "DATA" 354) |
| 27 |
+ (port-for-each (lambda (line) |
| 28 |
+ (format out "~a~a\r\n" |
| 29 |
+- (if (string-prefix? "." line) "." "") |
| 30 |
++ (if (and (not (string-incomplete? line)) (string-prefix? "." line)) "." "") |
| 31 |
+ line)) |
| 32 |
+ (lambda () (read-line iport #t))) |
| 33 |
+ (send-command "." 250) |
| 34 |
+--- a/tests/mailbox.scm |
| 35 |
++++ b/tests/mailbox.scm |
| 36 |
+@@ -9,7 +9,7 @@ |
| 37 |
+ (test-module 'scmail.mailbox) |
| 38 |
+ |
| 39 |
+ (define mailbox-table |
| 40 |
+- '((mh #f "Mail" "inbox") |
| 41 |
++ `((mh #f "Mail" "inbox") |
| 42 |
+ (maildir #f "Maildir" ""))) |
| 43 |
+ |
| 44 |
+ (define (mailbox-list) |
| 45 |
|
| 46 |
diff --git a/mail-filter/scmail/scmail-1.3.ebuild b/mail-filter/scmail/scmail-1.3.ebuild |
| 47 |
index 8c4b73406d53..25809d282452 100644 |
| 48 |
--- a/mail-filter/scmail/scmail-1.3.ebuild |
| 49 |
+++ b/mail-filter/scmail/scmail-1.3.ebuild |
| 50 |
@@ -20,6 +20,7 @@ DEPEND="${RDEPEND}" |
| 51 |
PATCHES=( |
| 52 |
"${FILESDIR}"/${PN}-doc-encoding.patch |
| 53 |
"${FILESDIR}"/${PN}-gauche-0.9.patch |
| 54 |
+ "${FILESDIR}"/${PN}-gauche-0.9.10.patch |
| 55 |
"${FILESDIR}"/${PN}-undefined-reference.patch |
| 56 |
) |
| 57 |
HTML_DOCS=( doc/{${PN},scbayes}{,-ja}.html ) |
Archives