Changeset 782 in MondoRescue for trunk/tools/mkchangelog.pl

Timestamp:

Aug 12, 2006, 11:32:32 AM (18 years ago)

Author:

Bruno Cornec

Message:

merge -r763:781 $SVN_M/branches/stable

File:

• trunk/tools/mkchangelog.pl (modified) (4 diffs)

trunk/tools/mkchangelog.pl

@@ -23 +23 @@
 my $tmp = "";
 my $ver = "";
+my $ver2 = "";
 my $date = "";
 
@@ -57 +58 @@
     }
 }
-print "Using $chglog as input ChangeLog file for $pkg\n";
+#print "Using $chglog as input ChangeLog file for $pkg\n";
 
 open(INPUT,"$chglog") || die "Unable to open $chglog (read)";
 open(OUTPUT,"> $outfile") || die "Unable to open $outfile (write)";
+
 # Skip first 4 lines
 $tmp = <INPUT>;
@@ -73 +75 @@
 }
 
+my $first=1;
+
 # Handle each block separated by newline
 while (<INPUT>) {
     ($ver, $date) = split(/ /);
+    $ver =~ s/^v//;
     chomp($date);
     $date =~ s/\(([0-9-]+)\)/$1/;
@@ -83 +88 @@
     #print "**$ndate**\n";
     if ($dtype eq "rpm") {
-        print OUTPUT "* $ndate Bruno Cornec <bruno\@mondorescue.org> VVV-RRR\n";
+        if ($ver !~ /-/) {
+            if ($first eq 1) {
+                $ver2 = "$ver-$ENV{TAG}"."$ENV{suf}";
+                $first=0;
+            } else {
+                $ver2 = "$ver-1"."$ENV{suf}";
+            }
+        } else {
+            $ver2 = "$ver"."$ENV{suf}";
+        }
+        print OUTPUT "* $ndate Bruno Cornec <bruno\@mondorescue.org> $ver2\n";
         print OUTPUT "- Updated to $ver\n";
         }