diff options
author | Jonas Smedegaard <dr@jones.dk> | 2007-02-07 11:43:34 +0000 |
---|---|---|
committer | Jonas Smedegaard <dr@jones.dk> | 2007-02-07 11:43:34 +0000 |
commit | 42db407188c9a5700dc643a9cbc41962c925c605 (patch) | |
tree | 27778394221c5f10ce0926641cf43e76fe9fc6d1 | |
parent | 86a8562dab77fa08d2ea0413775ab7212beca001 (diff) |
CVS id and version is 'mine', not 'ours': it should get redefined if clashing with a previous definition, not ignored.
-rwxr-xr-x | localuserinfo | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/localuserinfo b/localuserinfo index 8f01e0f..2c13ec6 100755 --- a/localuserinfo +++ b/localuserinfo @@ -1,5 +1,5 @@ #!/usr/bin/perl -wT -our $ID = q$Id: localuserinfo,v 1.3 2007-02-07 11:33:53 jonas Exp $; +my $ID = q$Id: localuserinfo,v 1.4 2007-02-07 11:43:34 jonas Exp $; # # localuserinfo -- List fullname for each user # @@ -35,7 +35,7 @@ my $ignore_badname = 0; # should we ignore bad names? our @names; # Resolve version number from CVS id -our $version = join (' ', (split (' ', $ID))[1..3]); +my $version = join (' ', (split (' ', $ID))[1..3]); $version =~ s/,v\b//; $version =~ s/(\S+)$/($1)/; |