From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Thien-Thi Nguyen Newsgroups: gmane.lisp.guile.devel Subject: small bugfix to (scripts read-text-outline) Date: Sat, 04 Dec 2021 06:54:13 -0500 Message-ID: <875ys4vb4q.fsf@gnuvola.org> Mime-Version: 1.0 Content-Type: multipart/signed; boundary="==-=-="; micalg=pgp-sha1; protocol="application/pgp-signature" Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="37136"; mail-complaints-to="usenet@ciao.gmane.io" User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.1 (gnu/linux) To: guile-devel@gnu.org Original-X-From: guile-devel-bounces+guile-devel=m.gmane-mx.org@gnu.org Sat Dec 04 12:54:50 2021 Return-path: Envelope-to: guile-devel@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1mtTct-0009Rl-Rz for guile-devel@m.gmane-mx.org; Sat, 04 Dec 2021 12:54:49 +0100 Original-Received: from localhost ([::1]:54678 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1mtTco-0001sB-Ad for guile-devel@m.gmane-mx.org; Sat, 04 Dec 2021 06:54:42 -0500 Original-Received: from eggs.gnu.org ([209.51.188.92]:36120) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mtTca-0001rn-Lb for guile-devel@gnu.org; Sat, 04 Dec 2021 06:54:30 -0500 Original-Received: from delivery.mailspamprotection.com ([146.66.121.165]:34619) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1mtTcY-0000Vz-FV for guile-devel@gnu.org; Sat, 04 Dec 2021 06:54:28 -0500 Original-Received: from 241.110.209.35.bc.googleusercontent.com ([35.209.110.241] helo=giow1035.siteground.us) by se21.mailspamprotection.com with esmtps (TLSv1.2:AES128-GCM-SHA256:128) (Exim 4.92) (envelope-from ) id 1mtTcV-000DSd-7L for guile-devel@gnu.org; Sat, 04 Dec 2021 05:54:25 -0600 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnuvola.org ; s=default; h=Content-Type:MIME-Version:Message-ID:Date:Subject:To:From: Sender:Reply-To:Cc:Content-Transfer-Encoding:Content-ID:Content-Description: Resent-Date:Resent-From:Resent-Sender:Resent-To:Resent-Cc:Resent-Message-ID: In-Reply-To:References:List-Id:List-Help:List-Unsubscribe:List-Subscribe: List-Post:List-Owner:List-Archive; bh=/Egek6GcitXbIs7ND6II/cH5FuQqqsnkN0rcZz00g1U=; b=N+WNFP8tJd4bHxM1AY/JjkrjZU R9AqVk6ZgmrzmPFA9HFf+geRnhxBf9jetPPls5E04yIGuvyTcJ3z3wyzco1V20G8XTrUkhjVVV3zR MnVMJLLRtuWI6EwVeVRhAmBiYolT+lK7/KVXarrYbxvCvDMW0pkfmZKuYwCnhQoAjlDo=; Original-Received: from [50.89.166.226] (port=38014 helo=abolire) by giow1035.siteground.us with esmtps (TLS1.2) tls TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384 (Exim 4.90-.1) (envelope-from ) id 1mtTcU-000Mf5-R6 for guile-devel@gnu.org; Sat, 04 Dec 2021 11:54:22 +0000 X-Originating-IP: 35.209.110.241 X-SpamExperts-Domain: giow1035.siteground.us X-SpamExperts-Username: 35.209.110.241 Authentication-Results: mailspamprotection.com; auth=pass smtp.auth=35.209.110.241@giow1035.siteground.us X-SpamExperts-Outgoing-Class: ham X-SpamExperts-Outgoing-Evidence: Combined (0.10) X-Recommended-Action: accept X-Filter-ID: Pt3MvcO5N4iKaDQ5O6lkdGlMVN6RH8bjRMzItlySaT8WY0TLAxayGxxuSamAfFWePUtbdvnXkggZ 3YnVId/Y5jcf0yeVQAvfjHznO7+bT5y4gxIXbEKH7ssFv2TkqIrwqA/pdxL9H6My4aKblWy1s6k9 f+GGzVH6Ei8FyfgtdOFaa40DxZPJuLUk3zkVKd8pdqDuc9lS3Nx+9iKFZ9qooJJVRKyFCRrxWkR6 oZhlSr3u7NHugLNJ2cNVoXghbQ51iFKfD1jKgYfH+6S5qDVYoHUyd5L3gpAr7FueVdI14W8XKu1V bgppFJRGoXLED7mHFMezBtsH+Fr5latICLxKTLF7XtAh+BMY6BfObX3/dANR1KFcGqMiorHmOcHv PdiGGnd5bMZA642MQGj9YRs9EBjUOmSnUu+ib6eENMSiUHaQHXehajF9VN8il9+E/vSHVpGb8ted /DA8b4vk3ZTlWN2BGPrKtAC7FsU49Klio9+YsXTCpNwQX5GuA33x6QVqaggHkNHKqJzNZuHo4cbr sUXtQhr43M8eCrxQqJFh3M54nzxvje8eZ3fS7i47mF8XB392eNvDmAiz8zBDUDaN5yk4xAm9D8KT eKJT7gNACPfBp8GgCRFRXP2MsoebOSvo2Yuh6t0fbK+w91teuBhtoy0XJfEgWGi+NJ2LBXRqQDSg 2T9m6sX0HqSZT2+tedlJB5hQ6nsDvccjqgmDvD9Wh3cQKzHbbzEgp2eOx13KaKnM/PFqE+qWB2Ex +ON9GuUcEmXxzRzRAAO4r3HiRIRPq+Wlc1fqXub/7zceJVoZJwuZ3gYQJ0zMrx3Ec/sSwGkJkilT ObJ/1fNBRIw4b2ya6Nlyk+AQkotsP X-Report-Abuse-To: spam@quarantine1.mailspamprotection.com Received-SPF: pass client-ip=146.66.121.165; envelope-from=ttn@gnuvola.org; helo=delivery.mailspamprotection.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: guile-devel@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: "Developers list for Guile, the GNU extensibility library" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-devel-bounces+guile-devel=m.gmane-mx.org@gnu.org Original-Sender: "guile-devel" Xref: news.gmane.io gmane.lisp.guile.devel:20990 Archived-At: --==-=-= Content-Type: multipart/mixed; boundary="=-=-=" --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Please find attached a small bugfix against =E2=80=98master=E2=80=99: --=-=-= Content-Type: text/x-diff Content-Disposition: inline; filename=0001-Fix-bug-Use-a-mutable-pair-for-mutable-pair-work.patch Content-Transfer-Encoding: quoted-printable From=20b8de6f77f8fdfee3e0833f976f1add6a99b98ca5 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Sat, 4 Dec 2021 06:46:36 -0500 Subject: [PATCH] Fix bug: Use a mutable pair for mutable pair work * module/scripts/read-text-outline.scm (make-text-outline-reader): Instead of '(start), use (list 'start). =2D-- module/scripts/read-text-outline.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/module/scripts/read-text-outline.scm b/module/scripts/read-tex= t-outline.scm index d0933bb0b..0a82949a4 100644 =2D-- a/module/scripts/read-text-outline.scm +++ b/module/scripts/read-text-outline.scm @@ -187,7 +187,7 @@ (define (make-text-outline-reader re specs) (let ((parse-line (make-line-parser re specs))) ;; retval (lambda (port) =2D (let* ((all '(start)) + (let* ((all (list 'start)) (pchain (list))) ; parents chain (let loop ((line (read-line port)) (prev-level -1) ; how this relates to the first in= put =2D-=20 2.30.2 --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable If it's okay w/ the maintainers, i can apply it shortly (presuming my SSH key on savannah still works!). IWBN to bubble this fix back to other branches. =2D-=20 Thien-Thi Nguyen ----------------------------------------------- (defun responsep (query) ; (2021) Software Libero (pcase (context query) ; =3D Dissenso Etico (`(technical ,ml) (correctp ml)) ...)) 748E A0E8 1CB8 A748 9BFA =2D-------------------------------------- 6CE4 6703 2224 4C80 7502 --=-=-=-- --==-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iG4EARECAC4WIQR0jqDoHLinSJv6bORnAyIkTIB1AgUCYatW5xAcdHRuQGdudXZv bGEub3JnAAoJEGcDIiRMgHUCeuwAoJBH1vt36svPDYk6ogKrVoEhBo+FAJ9361r2 s5iMzjfjF0ARokknV+NBZQ== =CE0F -----END PGP SIGNATURE----- --==-=-=--