make-html: add wilhelmtux color

[lugs.git] / make-html / make-html.pl

diff --git a/make-html/make-html.pl b/make-html/make-html.pl
index 71cdd6f5c2e04145c41b89536ecfabeed43a2093..c503cf532e47af61a5dc0e4e13fd1c332b24dd13 100755 (executable)
--- a/make-html/make-html.pl
+++ b/make-html/make-html.pl
@@ -2,14 +2,14 @@
 #
 # Konvertiert die LUGS-Terminliste (im ASCII Format) in ein HTML-File
 #
-# (c) 1996-1998               Roland Alder
-# (c) 2007-2008, 2011-2013    Steven Schubiger
+# (c) 1996-1998                     Roland Alder
+# (c) 2007-2008, 2011-2015, 2017    Steven Schubiger
 
 use strict;
 use warnings;
 use lib qw(lib);
 
-my $VERSION = '0.03';
+my $VERSION = '0.06';
 
 #-----------------------
 # Start of configuration
@@ -34,9 +34,11 @@ my $Config = {
        winti         => 'd6d6ce',      # ex http://www.stadt-winterthur.ch/
        innerschweiz  => '8abed7',      # ex http://www.luzern.ch/
        kreuzlingen   => 'f9f9f9',      # ehemals aargau (ex http://www.ag.ch/)
-       uzwil         => 'e2b1a5',      # wie heisst diese Farbe? :)
        stgallen      => 'e2b1a5',      # wie heisst diese Farbe? :)
        gnupingu      => 'ffd133',      # von http://www.gnupingu.ch/
+       debian        => 'ffa500',      # orange
+       hackerfunk    => '99b2cd',      # blau/grau
+       wilhelmtux    => 'ffffbf',      # from https://wilhelmtux.ch/
     },
     ical_dir    => 'ical',
 };
@@ -227,7 +229,7 @@ sub process_events
             LINK => $ics_link,
         });
 
-        $self->print_raw_html('</td></tr>');
+        $self->print_raw_html('</tr>');
     }
 
     $self->print_template('tabellenende');