From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gentoo-commits+bounces-1413536-garchives=archives.gentoo.org@lists.gentoo.org>
Received: from lists.gentoo.org (pigeon.gentoo.org [208.92.234.80])
	(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)
	 key-exchange X25519 server-signature RSA-PSS (2048 bits))
	(No client certificate requested)
	by finch.gentoo.org (Postfix) with ESMTPS id 96616158094
	for <garchives@archives.gentoo.org>; Thu, 30 Jun 2022 13:58:00 +0000 (UTC)
Received: from pigeon.gentoo.org (localhost [127.0.0.1])
	by pigeon.gentoo.org (Postfix) with SMTP id 094A9E0798;
	Thu, 30 Jun 2022 13:57:58 +0000 (UTC)
Received: from smtp.gentoo.org (woodpecker.gentoo.org [140.211.166.183])
	(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)
	 key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256)
	(No client certificate requested)
	by pigeon.gentoo.org (Postfix) with ESMTPS id DDEBDE0798
	for <gentoo-commits@lists.gentoo.org>; Thu, 30 Jun 2022 13:57:57 +0000 (UTC)
Received: from oystercatcher.gentoo.org (unknown [IPv6:2a01:4f8:202:4333:225:90ff:fed9:fc84])
	(using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)
	 key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256)
	(No client certificate requested)
	by smtp.gentoo.org (Postfix) with ESMTPS id A6553341951
	for <gentoo-commits@lists.gentoo.org>; Thu, 30 Jun 2022 13:57:56 +0000 (UTC)
Received: from localhost.localdomain (localhost [IPv6:::1])
	by oystercatcher.gentoo.org (Postfix) with ESMTP id 3929750C
	for <gentoo-commits@lists.gentoo.org>; Thu, 30 Jun 2022 13:57:55 +0000 (UTC)
From: "Akinori Hattori" <hattya@gentoo.org>
To: gentoo-commits@lists.gentoo.org
Content-Transfer-Encoding: 8bit
Content-type: text/plain; charset=UTF-8
Reply-To: gentoo-dev@lists.gentoo.org, "Akinori Hattori" <hattya@gentoo.org>
Message-ID: <1656597440.1b45410033de7e30b16d546f3a27c16f9f64339f.hattya@gentoo>
Subject: [gentoo-commits] repo/gentoo:master commit in: mail-filter/scmail/, mail-filter/scmail/files/
X-VCS-Repository: repo/gentoo
X-VCS-Files: mail-filter/scmail/files/scmail-gauche-0.9.10.patch mail-filter/scmail/scmail-1.3.ebuild
X-VCS-Directories: mail-filter/scmail/ mail-filter/scmail/files/
X-VCS-Committer: hattya
X-VCS-Committer-Name: Akinori Hattori
X-VCS-Revision: 1b45410033de7e30b16d546f3a27c16f9f64339f
X-VCS-Branch: master
Date: Thu, 30 Jun 2022 13:57:55 +0000 (UTC)
Precedence: bulk
List-Post: <mailto:gentoo-commits@lists.gentoo.org>
List-Help: <mailto:gentoo-commits+help@lists.gentoo.org>
List-Unsubscribe: <mailto:gentoo-commits+unsubscribe@lists.gentoo.org>
List-Subscribe: <mailto:gentoo-commits+subscribe@lists.gentoo.org>
List-Id: Gentoo Linux mail <gentoo-commits.gentoo.org>
X-BeenThere: gentoo-commits@lists.gentoo.org
X-Auto-Response-Suppress: DR, RN, NRN, OOF, AutoReply
X-Archives-Salt: 0d7b09d0-c614-4638-b797-caff83d778bb
X-Archives-Hash: fcb0d423a5104a8a743019ebe34a27a1

commit:     1b45410033de7e30b16d546f3a27c16f9f64339f
Author:     Akinori Hattori <hattya <AT> gentoo <DOT> org>
AuthorDate: Thu Jun 30 13:57:20 2022 +0000
Commit:     Akinori Hattori <hattya <AT> gentoo <DOT> org>
CommitDate: Thu Jun 30 13:57:20 2022 +0000
URL:        https://gitweb.gentoo.org/repo/gentoo.git/commit/?id=1b454100

mail-filter/scmail: fix tests with >=dev-scheme/gauche-0.9.10

Package-Manager: Portage-3.0.30, Repoman-3.0.3
Signed-off-by: Akinori Hattori <hattya <AT> gentoo.org>

 .../scmail/files/scmail-gauche-0.9.10.patch        | 22 ++++++++++++++++++++++
 mail-filter/scmail/scmail-1.3.ebuild               |  1 +
 2 files changed, 23 insertions(+)

diff --git a/mail-filter/scmail/files/scmail-gauche-0.9.10.patch b/mail-filter/scmail/files/scmail-gauche-0.9.10.patch
new file mode 100644
index 000000000000..ab6f5e04d2f6
--- /dev/null
+++ b/mail-filter/scmail/files/scmail-gauche-0.9.10.patch
@@ -0,0 +1,22 @@
+--- a/scmail/mail.scm
++++ b/scmail/mail.scm
+@@ -202,7 +202,7 @@
+ 	  (send-command "DATA" 354)
+ 	  (port-for-each (lambda (line)
+                            (format out "~a~a\r\n"
+-                                   (if (string-prefix? "." line) "." "")
++                                   (if (and (not (string-incomplete? line)) (string-prefix? "." line)) "." "")
+                                    line))
+ 			 (lambda () (read-line iport #t)))
+ 	  (send-command "." 250)
+--- a/tests/mailbox.scm
++++ b/tests/mailbox.scm
+@@ -9,7 +9,7 @@
+ (test-module 'scmail.mailbox)
+ 
+ (define mailbox-table
+-  '((mh      #f "Mail"    "inbox")
++  `((mh      #f "Mail"    "inbox")
+     (maildir #f "Maildir" "")))
+ 
+ (define (mailbox-list)

diff --git a/mail-filter/scmail/scmail-1.3.ebuild b/mail-filter/scmail/scmail-1.3.ebuild
index 8c4b73406d53..25809d282452 100644
--- a/mail-filter/scmail/scmail-1.3.ebuild
+++ b/mail-filter/scmail/scmail-1.3.ebuild
@@ -20,6 +20,7 @@ DEPEND="${RDEPEND}"
 PATCHES=(
 	"${FILESDIR}"/${PN}-doc-encoding.patch
 	"${FILESDIR}"/${PN}-gauche-0.9.patch
+	"${FILESDIR}"/${PN}-gauche-0.9.10.patch
 	"${FILESDIR}"/${PN}-undefined-reference.patch
 )
 HTML_DOCS=( doc/{${PN},scbayes}{,-ja}.html )