Changeset 659 in MondoRescue for branches/stable/tools/mkchangelog.pl

Timestamp:

Jun 9, 2006, 10:33:24 AM (18 years ago)

Author:

bcornec

Message:

changelog are now generated from mindi's and mondo's main ChangeLog files
new tool to create automatically announces for new version-tag
news.shtml and latest-news.html are now generated from a DB of announce (SQLite)
announce DB added (SQLite v3)
Build process improved for Debian

File:

• branches/stable/tools/mkchangelog.pl (modified) (3 diffs)

branches/stable/tools/mkchangelog.pl

@@ -20 +20 @@
 my $chglog = "";
 my $ndate = "";
+my $n2date = "";
 my $tmp = "";
 my $ver = "";
@@ -79 +80 @@
     #print "**$date**\n";
     $ndate = UnixDate($date,"%a", "%b", "%d", "%Y");
+    $n2date = &UnixDate($date,"%a, %d %b %Y %H:%M:%S %z");
     #print "**$ndate**\n";
     if ($dtype eq "rpm") {
@@ -84 +86 @@
         print OUTPUT "- Updated to $ver\n";
         }
+    if ($dtype eq "deb") {
+        print OUTPUT "$pkg ($ver) unstable; urgency=low\n";
+        print OUTPUT "\n";
+        }
 
     $tmp = <INPUT>; 
     while ($tmp !~ /^$/) {
-        print OUTPUT $tmp;
+        if ($dtype eq "deb") {
+            print OUTPUT "  * $tmp";
+        }
+        else {
+            print OUTPUT "$tmp";
+        }
         last if (eof(INPUT));
         $tmp = <INPUT>;
     }
     print OUTPUT "\n";
+
+    if ($dtype eq "deb") {
+        print OUTPUT " -- Bruno Cornec <bruno\@mondorescue.org>  $n2date\n\n";
+        print OUTPUT "\n";
+        }
+
     last if (eof(INPUT));
     last if ($dtype eq "announce");