From ae716da5bb24039df3073c04905a5e1444a19771 Mon Sep 17 00:00:00 2001
From: Darkelarious <darkelarious@333networks.com>
Date: Sat, 2 Oct 2021 23:36:23 +0200
Subject: serverflag symbols and style rotation

---
 lib/MasterWebInterface/Util/Layout.pm | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'lib/MasterWebInterface/Util')

diff --git a/lib/MasterWebInterface/Util/Layout.pm b/lib/MasterWebInterface/Util/Layout.pm
index 536aad7..20647fa 100755
--- a/lib/MasterWebInterface/Util/Layout.pm
+++ b/lib/MasterWebInterface/Util/Layout.pm
@@ -15,12 +15,24 @@ sub htmlHeader
     
     # CSS override: allow passing of style from GET --> ?style=classic
     my $style = $self->{style};
+    
+    # rotate styles for different occasions.
+    my @dt = localtime(time);
+    # specify dates [m/d] = styles
+    if ($dt[4] == 2  && $dt[3] == 31) {$style = "april";} # 31 mar and 1 apr
+    if ($dt[4] == 3  && $dt[3] ==  1) {$style = "april";}
+    if ($dt[4] == 9  && $dt[3] >=  1) {$style = "halloween";}
+    if ($dt[4] == 11 && $dt[3] >=  7) {$style = "xmas";}    
+    
     if (my $overrideStyle = $self->reqParam("style") ) 
     {
         # default to custom style if specified option doesn't exist
-        $style = ( -e "$self->{root}/s/style/$overrideStyle" ) ? $overrideStyle : $self->{style};
+        $style = $overrideStyle;
     }
     
+    # default to default style if specified option does not exist
+    $style = ( -e "$self->{root}/s/style/$style" ) ? $style : $self->{style};
+    
     html lang => "en";
         head;
             title "$o{title} :: $self->{site_name} masterserver";
-- 
cgit v1.2.3