From c4f5a6a04c8fe2002919a8296bed0a0cf1444852 Mon Sep 17 00:00:00 2001 From: Thomas Jensen Date: Fri, 10 Sep 1999 17:33:32 +0000 Subject: [PATCH] Renamed current snapshot archive file to boxes-SNAP-latest.tar.gz Added "milestones": Draw horizontal ruler at particular times (v1 out etc.) --- doc/create_changelog.pl | 21 +++++++++++++++++++-- 1 file changed, 19 insertions(+), 2 deletions(-) diff --git a/doc/create_changelog.pl b/doc/create_changelog.pl index dcac844..53f1e7c 100644 --- a/doc/create_changelog.pl +++ b/doc/create_changelog.pl @@ -3,11 +3,16 @@ # Author: Thomas Jensen # Date created: July 12, 1999 (Monday, 13:14h) # Language: Perl 5 -# Version: $Id: create_changelog.pl,v 1.2 1999/07/12 18:03:14 tsjensen Exp tsjensen $ +# Version: $Id: create_changelog.pl,v 1.3 1999/08/18 18:41:41 tsjensen Exp tsjensen $ # # History: # # $Log: create_changelog.pl,v $ +# Revision 1.3 1999/08/18 18:41:41 tsjensen +# Added HTML conversions for '&' and eacute +# Removing path from file name +# Changed introductory text +# # Revision 1.2 1999/07/12 18:03:14 tsjensen # Moved "List of Files" from top to bottom of page # Many modifications on the page's appearance @@ -23,6 +28,11 @@ @files = @ARGV; $#files >= 0 or die "no input files"; +%milestones = ( + "1999/08/22 11:37:27" => "VERSION 1.0 RELEASED", + "1999/06/25 18:52:28" => "FIRST BETA RELEASED" +); + print ' @@ -38,7 +48,7 @@ print ' This page is automatically updated whenever a few of the files listed below are checked in, so it is very up-to-date. It might already show changes which are not even in the current snapshot yet. +HREF="download/boxes-SNAP-latest.tar.gz">current snapshot yet.

Chronological Change Log

@@ -110,6 +120,13 @@ foreach $dat (sort @files) { foreach $line (reverse sort keys %cl) { + foreach (keys %milestones) { + if ($line =~ /^$_/) { + print "\n\n
\n
"; + print $milestones{$_}, "
\n"; + print "
\n\n
\n"; + } + } print "
$line\n"; print "
", @{$cl{$line}}, "

\n\n"; }