Return-Path: Delivered-To: apmail-perl-dev-archive@www.apache.org Received: (qmail 79271 invoked from network); 4 Apr 2005 20:16:39 -0000 Received: from hermes.apache.org (HELO mail.apache.org) (209.237.227.199) by minotaur.apache.org with SMTP; 4 Apr 2005 20:16:39 -0000 Received: (qmail 28373 invoked by uid 500); 4 Apr 2005 20:16:39 -0000 Delivered-To: apmail-perl-dev-archive@perl.apache.org Received: (qmail 28180 invoked by uid 500); 4 Apr 2005 20:16:38 -0000 Mailing-List: contact dev-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: List-Post: Delivered-To: mailing list dev@perl.apache.org Received: (qmail 28167 invoked by uid 99); 4 Apr 2005 20:16:38 -0000 X-ASF-Spam-Status: No, hits=0.0 required=10.0 tests= X-Spam-Check-By: apache.org Received-SPF: neutral (hermes.apache.org: local policy) Received: from mail.liquidation.com (HELO mail.liquidation.com) (65.196.108.169) by apache.org (qpsmtpd/0.28) with ESMTP; Mon, 04 Apr 2005 13:16:37 -0700 Received: from [10.0.0.206] (everything.liquidation.com [65.196.108.171]) (authenticated bits=0) by mail.liquidation.com (8.12.9/8.12.9) with ESMTP id j34KKEDE027088 (version=TLSv1/SSLv3 cipher=RC4-MD5 bits=128 verify=NO) for ; Mon, 4 Apr 2005 16:20:14 -0400 Message-ID: <4251A17C.6060601@p6m7g8.com> Date: Mon, 04 Apr 2005 16:20:12 -0400 From: "Philip M. Gollucci" Organization: Liquitidy Services, Inc. User-Agent: Mozilla Thunderbird 1.0 (Windows/20041206) X-Accept-Language: en-us, en MIME-Version: 1.0 To: dev@perl.apache.org Subject: Re: svn commit: r160089 - perl/modperl/trunk/lib/ModPerl/BuildMM.pm References: <20050404190536.58276.qmail@minotaur.apache.org> In-Reply-To: <20050404190536.58276.qmail@minotaur.apache.org> Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit X-MailScanner-Information: Please contact the ISP for more information X-MailScanner: Found to be clean X-MailScanner-SpamCheck: not spam (whitelisted), SpamAssassin (score=-4.759, required 5, AWL 0.14, BAYES_00 -4.90) X-Virus-Checked: Checked X-Spam-Rating: minotaur.apache.org 1.6.2 0/1000/N geoff@apache.org wrote: >Author: geoff >Date: Mon Apr 4 12:05:35 2005 >New Revision: 160089 > >URL: http://svn.apache.org/viewcvs?view=rev&rev=160089 >Log: >add manpages for stuff so that both perldoc and man work >properly > >Modified: > perl/modperl/trunk/lib/ModPerl/BuildMM.pm > >Modified: perl/modperl/trunk/lib/ModPerl/BuildMM.pm >URL: http://svn.apache.org/viewcvs/perl/modperl/trunk/lib/ModPerl/BuildMM.pm?view=diff&r1=160088&r2=160089 >============================================================================== >--- perl/modperl/trunk/lib/ModPerl/BuildMM.pm (original) >+++ perl/modperl/trunk/lib/ModPerl/BuildMM.pm Mon Apr 4 12:05:35 2005 >@@ -245,6 +245,14 @@ > '$(FULLPERL) -I$(INST_LIB) ' . > "-I$apache_test_dir -MModPerl::BuildMM " . > "-e ModPerl::BuildMM::glue_pod $pm $podpath $blib"; >+ >+ # manify while we're at it >+ my (undef, $man, undef) = $blib =~ m!(blib/lib/)(.*)(\.pm)!; >+ $man =~ s!/!::!g; >+ >+ push @target, >+ '$(NOECHO) $(POD2MAN) --section=3 ' . >+ "$podpath \$(INST_MAN3DIR)/$man.\$(MAN3EXT)" > } > } > > > > > I dont' think it matters much, but why not + my ($man) = $blib =~ m!(?:blib/lib/)(.*)(?:\.pm)!; -- END ----------------------------------------------------------------------------- Philip M. Gollucci Senior Developer - Liquidity Services Inc. Phone: 202.568.6268 (Direct) E-Mail: pgollucci@liquidation.com Web: http://www.liquidation.com --------------------------------------------------------------------- To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org For additional commands, e-mail: dev-help@perl.apache.org