X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Flicenses.pl;h=fb065f2549b46678fc34c6e6b35729bf8fcbee47;hb=1e0d413084100ccd892e8c5be95703be5d965de7;hp=fd8f01d9f514e8c24f914a8d26882a4978671315;hpb=d629acd82a27e980899a044ca8b0f4becc8e94bb;p=kivitendo-erp.git diff --git a/bin/mozilla/licenses.pl b/bin/mozilla/licenses.pl index fd8f01d9f..fb065f254 100644 --- a/bin/mozilla/licenses.pl +++ b/bin/mozilla/licenses.pl @@ -37,15 +37,22 @@ use SL::LICENSES; require "bin/mozilla/common.pl"; +use strict; + sub quot { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); $_[0] =~ s/\"/\"/g; - $lxdebug->leave_sub(); + $main::lxdebug->leave_sub(); return $_[0]; } sub form_header { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); + + $main::auth->assert('license_edit'); + + my $form = $main::form; + $form->{jsscript} = 1; $form->header(); @@ -53,34 +60,48 @@ sub form_header { qq|
+ qq|