diff options
| author | Eric S. Raymond <esr@thyrsus.com> | 1999-04-26 07:12:53 +0000 |
|---|---|---|
| committer | Eric S. Raymond <esr@thyrsus.com> | 1999-04-26 07:12:53 +0000 |
| commit | 3039840c9e255fdfcd685574453e59fef097e895 (patch) | |
| tree | 87f92673a16c7c02405f9f776a33d712690cfba3 /makerelease | |
| parent | e58701df90b7b3b8a076300c1db2dca0e49da40b (diff) | |
| download | fetchmail-3039840c9e255fdfcd685574453e59fef097e895.tar.gz fetchmail-3039840c9e255fdfcd685574453e59fef097e895.tar.bz2 fetchmail-3039840c9e255fdfcd685574453e59fef097e895.zip | |
Another try at getting Debian changelogs right.
svn path=/trunk/; revision=2455
Diffstat (limited to 'makerelease')
| -rwxr-xr-x | makerelease | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/makerelease b/makerelease index b61fb585..b3644b6a 100755 --- a/makerelease +++ b/makerelease @@ -4,6 +4,18 @@ # Dumps a release notice and diffs as a MIME multipart message # in RELEASE_NOTES # +$timezone = "EDT"; + +sub rfc822date +{ + @wdays = ("Mon", "Tue", "Wed", "Thu", "Fri", "Sat"); + @months = ("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Nov", "Dec"); + + my($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time()); + "$wdays[$wday] $months[$mon] " . substr("0$mday", -2) . " " . substr("0$hour", -2) . ":" . substr("0$min", -2) . ":" . substr("0$sec", -2) . " $timezone " . (1900+$year); +} + + $version=`grep 'VERSION *=' Makefile.in`; $version =~ /VERSION *= *(.*)/; $version = $1; @@ -47,6 +59,7 @@ $logvers = $1; if ($version eq $logvers) { print "No change to Debian logfile...\n"; } else { + $date = &rfc822date(); print "Updating the Debian logfile ($logvers -> $version)...\n"; open(DEBLOG, ">>debian/changelog"); print DEBLOG <<EOF; |