Changeset 777


Ignore:
Timestamp:
Aug 9, 2006, 1:39:30 AM (13 years ago)
Author:
bruno
Message:

Fix #41 again

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2.0.9/tools/mkchangelog.pl

    r776 r777  
    6262open(INPUT,"$chglog") || die "Unable to open $chglog (read)";
    6363open(OUTPUT,"> $outfile") || die "Unable to open $outfile (write)";
    64 open(TAG, "$ENV{TOPDIR}/LAST") || die "Unable to open $ENV{TOPDIR}/LAST";
    6564
    66 $tmp = <TAG>;
    67 chomp($tmp);
    68 my ($tmp2, $tag) = split(/-/, $tmp);
    6965# Skip first 4 lines
    7066$tmp = <INPUT>;
     
    9187    if ($dtype eq "rpm") {
    9288        if ($ver !~ /-/) {
    93             $ver2 = "$ver-$tag"."$ENV{suf}";
     89            $ver2 = "$ver-$ENV{TAG}"."$ENV{suf}";
    9490        } else {
    9591            $ver2 = "$ver"."$ENV{suf}";
Note: See TracChangeset for help on using the changeset viewer.