From 902d50a0bd8fc50032407554f071006ab0bddf3d Mon Sep 17 00:00:00 2001
From: io <>
Date: Fri, 28 Jan 2005 21:27:06 +0000
Subject: [PATCH] transition to css - part I

---
 ezmlm-web/trunk/css/default.css | 12 ++++++++++++
 ezmlm-web/trunk/ezmlm-web.cgi   |  3 ++-
 ezmlm-web/trunk/ezmlmwebrc      | 17 ++++++-----------
 3 files changed, 20 insertions(+), 12 deletions(-)
 create mode 100644 ezmlm-web/trunk/css/default.css

diff --git a/ezmlm-web/trunk/css/default.css b/ezmlm-web/trunk/css/default.css
new file mode 100644
index 0000000..583c8b7
--- /dev/null
+++ b/ezmlm-web/trunk/css/default.css
@@ -0,0 +1,12 @@
+body	{
+	background-color: #000080;
+	color: #000000;
+	}
+
+a	{
+	color: #3333ff;
+	}
+
+a:visited {
+	color: #8888ff;
+	}
diff --git a/ezmlm-web/trunk/ezmlm-web.cgi b/ezmlm-web/trunk/ezmlm-web.cgi
index aaf1a8f..df8cf89 100755
--- a/ezmlm-web/trunk/ezmlm-web.cgi
+++ b/ezmlm-web/trunk/ezmlm-web.cgi
@@ -70,6 +70,7 @@ use vars qw[$DEFAULT_OPTIONS %EZMLM_LABELS $UNSAFE_RM $ALIAS_USER $LIST_DIR];
 use vars qw[$QMAIL_BASE $EZMLM_CGI_RC $EZMLM_CGI_URL $HTML_BGCOLOR $PRETTY_NAMES];
 use vars qw[%HELPER $HELP_ICON_URL $HTML_HEADER $HTML_FOOTER $HTML_TEXT $HTML_LINK];
 use vars qw[%BUTTON %LANGUAGE $HTML_VLINK $HTML_TITLE $FILE_UPLOAD $WEBUSERS_FILE];
+use vars qw[$HTML_CSS_FILE];
 
 # Get user configuration stuff
 if(defined($opt_C)) {
@@ -111,7 +112,7 @@ if(defined($Q::action) && $Q::action eq '[Web Archive]') {
 
 # Print header on every page ...
 print $q->header(-pragma=>'no-cache', '-cache-control'=>'no-cache', -expires=>'-1d', '-Content-Type'=>'text/html; charset=utf-8');
-print $q->start_html(-title=>$HTML_TITLE, -author=>'guy-ezmlm@rucus.ru.ac.za', -BGCOLOR=>$HTML_BGCOLOR, -LINK=>$HTML_LINK, -VLINK=>$HTML_VLINK, -TEXT=>$HTML_TEXT, -expires=>'-1d');
+print $q->start_html(-style=>{'src'=>"$HTML_CSS_FILE"},-title=>$HTML_TITLE, -author=>'guy-ezmlm@rucus.ru.ac.za', -expires=>'-1d');
 print $HTML_HEADER;
 
 # check permissions
diff --git a/ezmlm-web/trunk/ezmlmwebrc b/ezmlm-web/trunk/ezmlmwebrc
index 301394f..c1c5113 100644
--- a/ezmlm-web/trunk/ezmlmwebrc
+++ b/ezmlm-web/trunk/ezmlmwebrc
@@ -61,21 +61,16 @@ $HTML_FOOTER = '</TD></TR></TABLE>';
 $HTML_FOOTER .= '<TABLE BORDER="0" CELLPADDING="5" CELLSPACING="5" ALIGN="CENTER" WIDTH="99%"><TR><TD BGCOLOR="#e0e0ff">';
 $HTML_FOOTER .= '<FONT SIZE="-1"><A HREF="https://systemausfall.org/toolforge/ezmlm-web" TARGET="_blank">ezmlm-web</A> (v2.2) A web interface to <A HREF="http://www.ezmlm.org/" TARGET="_blank">ezmlm</A></FONT></TD></TR></TABLE>';
 
-# What colour do we want the background to be?
-$HTML_BGCOLOR = '#000080'; 
-
-# What colour do we want text?
-$HTML_TEXT = '#000000';
-
-# What color do we want links?
-$HTML_LINK = '#3333ff';
-
-# What color to we want visited links?
-$HTML_VLINK = '#8888ff';
+# NEW:
+# html properties (e.g. color, background-color) can be defined in a
+# stylesheet (see HTML_CSS_FILE) since version 2.3
 
 # What is the title of this document?
 $HTML_TITLE = 'E Z Mailing List Manager';
 
+# Optional: use a cascading style sheet (css)
+$HTML_CSS_FILE = "css/default.css";
+
 # choose a language (en|de)
 $HTML_LANGUAGE = 'en';