From nobody Wed Feb 11 01:26:06 2026 Delivered-To: importer@patchew.org Received-SPF: temperror (zoho.com: Error in retrieving data from DNS) client-ip=208.118.235.17; envelope-from=qemu-devel-bounces+importer=patchew.org@gnu.org; helo=lists.gnu.org; Authentication-Results: mx.zohomail.com; spf=temperror (zoho.com: Error in retrieving data from DNS) smtp.mailfrom=qemu-devel-bounces+importer=patchew.org@gnu.org Return-Path: Received: from lists.gnu.org (lists.gnu.org [208.118.235.17]) by mx.zohomail.com with SMTPS id 1506958084879975.6780110799597; Mon, 2 Oct 2017 08:28:04 -0700 (PDT) Received: from localhost ([::1]:52826 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dz2dT-0000oM-Fa for importer@patchew.org; Mon, 02 Oct 2017 11:27:59 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:38632) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dz2bZ-0007x0-EM for qemu-devel@nongnu.org; Mon, 02 Oct 2017 11:26:02 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dz2bW-0007rb-5d for qemu-devel@nongnu.org; Mon, 02 Oct 2017 11:26:01 -0400 Received: from mx1.redhat.com ([209.132.183.28]:38332) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1dz2bV-0007rD-W9 for qemu-devel@nongnu.org; Mon, 02 Oct 2017 11:25:58 -0400 Received: from smtp.corp.redhat.com (int-mx01.intmail.prod.int.phx2.redhat.com [10.5.11.11]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.redhat.com (Postfix) with ESMTPS id 0187080478; Mon, 2 Oct 2017 15:25:57 +0000 (UTC) Received: from blackfin.pond.sub.org (ovpn-116-91.ams2.redhat.com [10.36.116.91]) by smtp.corp.redhat.com (Postfix) with ESMTPS id 144FA91B10; Mon, 2 Oct 2017 15:25:54 +0000 (UTC) Received: by blackfin.pond.sub.org (Postfix, from userid 1000) id 880F7115626C; Mon, 2 Oct 2017 17:25:52 +0200 (CEST) DMARC-Filter: OpenDMARC Filter v1.3.2 mx1.redhat.com 0187080478 Authentication-Results: ext-mx04.extmail.prod.ext.phx2.redhat.com; dmarc=none (p=none dis=none) header.from=redhat.com Authentication-Results: ext-mx04.extmail.prod.ext.phx2.redhat.com; spf=fail smtp.mailfrom=armbru@redhat.com From: Markus Armbruster To: qemu-devel@nongnu.org Date: Mon, 2 Oct 2017 17:25:22 +0200 Message-Id: <20171002152552.27999-3-armbru@redhat.com> In-Reply-To: <20171002152552.27999-1-armbru@redhat.com> References: <20171002152552.27999-1-armbru@redhat.com> X-Scanned-By: MIMEDefang 2.79 on 10.5.11.11 X-Greylist: Sender IP whitelisted, not delayed by milter-greylist-4.5.16 (mx1.redhat.com [10.5.110.28]); Mon, 02 Oct 2017 15:25:57 +0000 (UTC) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] [fuzzy] X-Received-From: 209.132.183.28 Subject: [Qemu-devel] [RFC PATCH 02/32] texi2pod: Support @verbatim environment X-BeenThere: qemu-devel@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: marcandre.lureau@redhat.com, mdroth@linux.vnet.ibm.com Errors-To: qemu-devel-bounces+importer=patchew.org@gnu.org Sender: "Qemu-devel" X-ZohoMail: RSF_6 Z_629925259 SPT_0 Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 Content-Type: text/plain; charset="utf-8" Signed-off-by: Markus Armbruster Reviewed-by: Eric Blake --- scripts/texi2pod.pl | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) diff --git a/scripts/texi2pod.pl b/scripts/texi2pod.pl index 39ce584a32..2171f8b819 100755 --- a/scripts/texi2pod.pl +++ b/scripts/texi2pod.pl @@ -85,6 +85,13 @@ if (defined $out) { =20 while(defined $inf) { while(<$inf>) { + # Verbatim environment + if (defined $endw and $endw eq "verbatim" + and not (/^\@end\s+([a-z]+)/ and $1 eq $endw)) { + $section .=3D "\t".$_; + next; + } + # Certain commands are discarded without further processing. /^\@(?: [a-z]+index # @*index: useful only in complete manual @@ -165,7 +172,7 @@ while(<$inf>) { if ($ended =3D~ /^(?:ifset|ifclear|ignore|menu|iftex)$/) { $skipping =3D pop @skstack; next; - } elsif ($ended =3D~ /^(?:example|smallexample|display + } elsif ($ended =3D~ /^(?:example|smallexample|display|verbatim |quotation|deftp|deftypefn)$/x) { $shift =3D ""; $_ =3D ""; # need a paragraph break @@ -311,7 +318,7 @@ while(<$inf>) { $_ =3D "\n=3Dover 4\n"; }; =20 - /^\@((?:small)?example|display)/ and do { + /^\@((?:small)?example|display|verbatim)/ and do { push @endwstack, $endw; $endw =3D $1; $shift =3D "\t"; --=20 2.13.6