X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=Makefile.PL;h=b89c81582b91981a97faf8dfd76c1f452accb64e;hb=5b2a599c524b51bc64bc3f3ff22297e6fa86f441;hp=21a59d69113d356e1e9ece11e1c7d70d856e043a;hpb=1f656a1fd6f4afa3d162194a094fcbfd094396e6;p=catagits%2FCatalyst-Runtime.git

diff --git a/Makefile.PL b/Makefile.PL
index 21a59d6..b89c815 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -32,8 +32,9 @@ WriteMakefile(
 );
 
 print( '*' x 80, "\n" );
-print( (qw/draven fordmason naughton sri the_jester/)[ int( rand(5) ) ],
-    " is the greatest and gabb is drunk again!\n" );
+print( (qw/chansen draven fordmason naughton sri the_jester/)[ int( rand(6) ) ],
+    " is the greatest and gabb is ", 
+    ((localtime)[2] > 12 ? "drunk" : "hung over"), " again!\n" );
 print( '*' x 80, "\n" );
 
 eval "use mod_perl; use Apache::Request";