Kosmetik

diff --git a/SL/Controller/Base.pm b/SL/Controller/Base.pm
index 392f441c24211bd63ebb9a320218df05319d27a3..f8eee88a6cd0e141af4bfa7aa806c5fb36f5b579 100644 (file)
--- a/SL/Controller/Base.pm
+++ b/SL/Controller/Base.pm
@@ -65,15 +65,15 @@ sub render {
   }
 
   my %params = ( %locals,
   }
 
   my %params = ( %locals,

-                 AUTH     => $::auth,
-                 FLASH    => $::form->{FLASH},
-                 FORM     => $::form,
+                 AUTH          => $::auth,
+                 FLASH         => $::form->{FLASH},
+                 FORM          => $::form,

                  INSTANCE_CONF => $::instance_conf,
                  INSTANCE_CONF => $::instance_conf,

-                 LOCALE   => $::locale,
-                 LXCONFIG => \%::lx_office_conf,
-                 LXDEBUG  => $::lxdebug,
-                 MYCONFIG => \%::myconfig,
-                 SELF     => $self,
+                 LOCALE        => $::locale,
+                 LXCONFIG      => \%::lx_office_conf,
+                 LXDEBUG       => $::lxdebug,
+                 MYCONFIG      => \%::myconfig,
+                 SELF          => $self,

                );
 
   my $output;
                );
 
   my $output;

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 03f1c5776bf5ef28af9ef806b82dfdf0aaa6c168..4aadef74d28a55e97d8ea650f2c5ee4969f768eb 100644 (file)
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -169,10 +169,10 @@ sub handle_request {
 
   $self->unrequire_bin_mozilla;
 
 
   $self->unrequire_bin_mozilla;
 

-  $::cgi         = CGI->new('');
-  $::locale      = Locale->new($::lx_office_conf{system}->{language});
-  $::form        = Form->new;
-  %::called_subs = ();
+  $::cgi           = CGI->new('');
+  $::locale        = Locale->new($::lx_office_conf{system}->{language});
+  $::form          = Form->new;
+  %::called_subs   = ();

   $::instance_conf = SL::InstanceConfiguration->new;
 
   my $session_result = $::auth->restore_session;
   $::instance_conf = SL::InstanceConfiguration->new;
 
   my $session_result = $::auth->restore_session;

diff --git a/scripts/console b/scripts/console
index b9b474585abc77cdb3927f7bc73cde42f3903302..d567c56400d13289c351dfc27f2667cb2a5dcc7d 100755 (executable)
--- a/scripts/console
+++ b/scripts/console
@@ -60,11 +60,11 @@ sub lxinit {
 
   package main;
 
 
   package main;
 

-  $::lxdebug = LXDebug->new(file => $debug_file);
-  $::locale = Locale->new($::lx_office_conf{system}->{language});
-  $::cgi    = CGI->new qw();
-  $::form   = Form->new;
-  $::auth   = SL::Auth->new;
+  $::lxdebug       = LXDebug->new(file => $debug_file);
+  $::locale        = Locale->new($::lx_office_conf{system}->{language});
+  $::cgi           = CGI->new qw();
+  $::form          = Form->new;
+  $::auth          = SL::Auth->new;

   $::instance_conf = SL::InstanceConfiguration->new;
 
   die 'cannot reach auth db'               unless $::auth->session_tables_present;
   $::instance_conf = SL::InstanceConfiguration->new;
 
   die 'cannot reach auth db'               unless $::auth->session_tables_present;