From: weasel Date: Tue, 29 Jun 2004 12:32:29 +0000 (+0000) Subject: Move revision number into version string X-Git-Url: https://git.sthu.org/?a=commitdiff_plain;h=af8dc43fab3680949b67cf7d11aa93f763652522;p=pgp-tools.git Move revision number into version string git-svn-id: svn://svn.debian.org/pgp-tools/trunk@7 b513b33f-fedd-0310-b452-c3deb5f4c849 --- diff --git a/caff/caff b/caff/caff index e1b28f1..80bbf98 100755 --- a/caff/caff +++ b/caff/caff @@ -41,7 +41,8 @@ use GnuPG::Interface; my %CONFIG; my $REVISION = '$Rev$'; -my $VERSION = '0.0.0.1'; +my ($REVISION_NUMER) = $REVISION =~ /(\d+)/; +my $VERSION = "0.0.0.$REVISION_NUMER"; sub load_config() { my $config = $ENV{'HOME'} . '/.caffrc'; @@ -228,6 +229,7 @@ my $DATE_STRING = sprintf("%04d-%02d-%02d", $year+1900, $mon+1, $mday); sub usage() { + print STDERR "caff $VERSION - (c) 2004 Peter Palfrader\n"; print STDERR "Usage: $PROGRAM_NAME [-u [ ...]\n"; exit 1; };