X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1b15807093421ca00493a447048b960f2f512152..c60cb1f08f:/bin/mozilla/login.pl

diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl
index 553909355..a8305cfcc 100644
--- a/bin/mozilla/login.pl
+++ b/bin/mozilla/login.pl
@@ -24,19 +24,20 @@
 # GNU General Public License for more details.
 # You should have received a copy of the GNU General Public License
 # along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA 02110-1335, USA.
 #######################################################################
 
 use SL::DB::Default;
 use SL::Form;
 use SL::Git;
+use DateTime;
 
 require "bin/mozilla/common.pl";
 require "bin/mozilla/todo.pl";
 
 use strict;
 
-our $cgi;
 our $form;
 our $auth;
 
@@ -54,6 +55,7 @@ sub company_logo {
 
   my $git             = SL::Git->new;
   ($form->{git_head}) = $git->get_log(since => 'HEAD~1', until => 'HEAD') if $git->is_git_installation;
+  $form->{xmas}       = '_xmas' if (DateTime->today->month == 12 && DateTime->today->day < 27);
 
   # create the logo screen
   $form->header() unless $form->{noheader};