X-Git-Url: http://git.refcnt.org/?p=lugs.git;a=blobdiff_plain;f=make-html%2Fmake-html.pl;h=be6d14525cae6f6ec7d7dd20a19c797a6ca2cb77;hp=6b66bc9d96cee62cbee68254238369a75dd7b01f;hb=36abab35a27dcd4d204dc186a3196aa1668805ee;hpb=f6de7ce92c748f6097a5f69e9758cc4bdb68a574 diff --git a/make-html/make-html.pl b/make-html/make-html.pl index 6b66bc9..be6d145 100755 --- a/make-html/make-html.pl +++ b/make-html/make-html.pl @@ -3,13 +3,13 @@ # Konvertiert die LUGS-Terminliste (im ASCII Format) in ein HTML-File # # (c) 1996-1998 Roland Alder -# (c) 2007-2008, 2011-2013 Steven Schubiger +# (c) 2007-2008, 2011-2014 Steven Schubiger use strict; use warnings; use lib qw(lib); -my $VERSION = '0.03'; +my $VERSION = '0.04'; #----------------------- # Start of configuration @@ -34,9 +34,10 @@ 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 }, ical_dir => 'ical', }; @@ -74,7 +75,7 @@ use constant true => 1; use File::Copy qw(copy); use File::Temp qw(tempfile); -use LUGS::Events::Parser; +use LUGS::Events::Parser (); # Return a new instance of our class. sub new @@ -368,7 +369,7 @@ __DATA__ # fussnoten -

-Alle Angaben ohne Gewähr, letzte Ă„nderung der Terminliste: [% AENDERUNG %] +Alle Angaben ohne Gewähr, letzte Änderung der Terminliste: [% AENDERUNG %] # blank -