diff options
| author | Nathan Kinder <nkinder@redhat.com> | 2006-10-17 17:07:14 +0000 |
|---|---|---|
| committer | Nathan Kinder <nkinder@redhat.com> | 2006-10-17 17:07:14 +0000 |
| commit | a6667a86c013b5f34ee163473348d38f3ad2a3fd (patch) | |
| tree | a376aeabd05021f2a717ea72519fd2e48afc6786 /buildnum.pl | |
| parent | 28442c792a2b900f18000b57a86b3b9c8b3aa0c8 (diff) | |
| download | ds-a6667a86c013b5f34ee163473348d38f3ad2a3fd.tar.gz ds-a6667a86c013b5f34ee163473348d38f3ad2a3fd.tar.xz ds-a6667a86c013b5f34ee163473348d38f3ad2a3fd.zip | |
Related: 210736
Phase one of implementing new GNU Automake/Autoconf build system.
Diffstat (limited to 'buildnum.pl')
| -rwxr-xr-x | buildnum.pl | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/buildnum.pl b/buildnum.pl index eb2643e9..8a143c12 100755 --- a/buildnum.pl +++ b/buildnum.pl @@ -57,8 +57,7 @@ getopts('p:H'); if ($opt_H) {exitHelp();} # Load arguments -$platdir = $opt_p || exitHelp(); -$buildnum_file = "./$platdir/buildnum.dat"; +$platdir = $opt_p; # Get current time @now = gmtime; @@ -70,10 +69,15 @@ if ($doy < 100) { $doy = 0 . $doy; } $tod = $now[2] . $now[1]; $buildnum = "$year.$doy.$tod"; -# Write buildnum.dat -open(BUILDNUM,">$buildnum_file") || die "Error: Can't create $buildnum_file: $!\n"; -print BUILDNUM "\\\"$buildnum\\\""; -close(BUILDNUM); +if ($platdir) { + # Write buildnum.dat + $buildnum_file = "./$platdir/buildnum.dat"; + open(BUILDNUM,">$buildnum_file") || die "Error: Can't create $buildnum_file: $!\n"; + print BUILDNUM "\\\"$buildnum\\\""; + close(BUILDNUM); +} else { + print "\\\"$buildnum\\\""; +} #---------- exitHelp subroutine ---------- sub exitHelp { |