bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-22 08:33:24 -05:00
Code Issues Projects Releases Wiki Activity

Adds a better check for the version.

Browse Source
This commit is contained in:
freesource 2001-09-10 19:00:17 +00:00
parent b6654a93ef
commit dd791da247
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gbootroot_pkg
View File

@ -29,11 +29,11 @@ my $email = "freesource\@users.sourceforge.net";
my $name = "Jonathan Rosenbaum";
# Other vars
my $version;
my ($real_uid, $real_gid) = (stat($user_home))[4,5];
# Find the version
my $version;
open(CVS, "$gbootroot_cvs/$prog") or
die "Couldn't find $prog in $gbootroot_cvs: $!\n";
while (<CVS>) {
@ -132,8 +132,8 @@ close (CHANGELOG);
my $stop;
foreach (@changelog) {
if (/$version/) {
print "\nThe changelog for $version already exists, this may mean\n" .
if (/$version-$revision/) {
print "\nThe changelog for $version-$revision already exists, this may mean\n" .
"that this is the first invocation or that you haven't changed the\n" .
"version in the $prog program.\n";
$stop = 1;