summaryrefslogtreecommitdiff
path: root/lsmb-request.pl
diff options
context:
space:
mode:
Diffstat (limited to 'lsmb-request.pl')
-rw-r--r--lsmb-request.pl8
1 files changed, 2 insertions, 6 deletions
diff --git a/lsmb-request.pl b/lsmb-request.pl
index afc3f2a8..47eec723 100644
--- a/lsmb-request.pl
+++ b/lsmb-request.pl
@@ -36,14 +36,10 @@ use Data::Dumper;
eval { require "custom.pl"; };
$request = new LedgerSMB;
+$request->{action} = '__default' if (!$request->{action});
-$0 =~ m/([^\/\\]*.pl)$/;
-if (!$1){
- $0 =~ m/([^\/\\]*.pl)[? ]/;
-}
-
+$0 =~ m/([^\/\\]*.pl)\?*.*$/;
$script = $1;
-
$locale = LedgerSMB::Locale->get_handle( ${LedgerSMB::Sysconfig::language} )
or $request->error( __FILE__ . ':' . __LINE__ . ": Locale not loaded: $!\n" );