From: Moritz Bunkus <moritz@bunkus.org>
Date: Tue, 1 Feb 2011 14:39:42 +0000 (+0100)
Subject: Bei der Console nicht automatisch versuchen, Sort::Naturally zu laden
X-Git-Tag: release-2.6.3~61^2~7^2~1^2~4
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=0fa5eadc89319dc8680654e47354baafe394c3e3;p=kivitendo-erp.git

Bei der Console nicht automatisch versuchen, Sort::Naturally zu laden
---

diff --git a/config/lx_office.conf.default b/config/lx_office.conf.default
index dfaf17c0f..d843ec27a 100644
--- a/config/lx_office.conf.default
+++ b/config/lx_office.conf.default
@@ -105,12 +105,10 @@ login = mb
 
 # autorun lines will be executed after autologin.
 # be warned that loading huge libraries will noticably lengthen startup time.
-autorun = require "bin/mozilla/common.pl";
-        = use English qw(-no_match_vars);
-        = use List::Util qw(min max);
-        = use Sort::Naturally;
-        = my ($a, $b, $e, $f, @a1, @a2, %h);
-        = sub take { my $max = shift; my $r = ref($_[0]) eq 'ARRAY' ? $_[0] : \@_; return @{$r}[0..List::Util::min($max, scalar(@{$r})) - 1]; }
+#autorun = require "bin/mozilla/common.pl";
+#        = use English qw(-no_match_vars);
+#        = use List::Util qw(min max);
+#        = sub take { my $max = shift; my $r = ref($_[0]) eq 'ARRAY' ? $_[0] : \@_; return @{$r}[0..List::Util::min($max, scalar(@{$r})) - 1]; }
 
 # location of history file for permanent history
 history_file = users/console_history