develooper Front page | perl.perl5.porters | Postings from May 2003

Re: [PATCH pod/perlmod.pod] Simpler $Revision$ based $VERSION. Plus, repentance!

Thread Previous | Thread Next
From:
andreas.koenig
Date:
May 3, 2003 20:05
Subject:
Re: [PATCH pod/perlmod.pod] Simpler $Revision$ based $VERSION. Plus, repentance!
Message ID:
m37k971kek.fsf@franz.ak.mind.de
>>>>> On Sat, 3 May 2003 15:30:16 -0700, Michael G Schwern <schwern@pobox.com> said:

  > -        $VERSION = do { my @r = (q$Revision: 1.1 $ =~ /\d+/g); sprintf "%d."."%02d" x $#r, @r }; # must be all one line, for MakeMaker
  > +        $VERSION = sprintf "%d.%03d", q$Revision: 1.1 $ =~ /(\d+)/g;
 
IIRC, if you ever branch in RCS, you are forced to use N.N.N.N style
revision numbers.


-- 
andreas

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About