X-Git-Url: http://wagnertech.de/git?p=kivitendo-erp.git;a=blobdiff_plain;f=scripts%2Fgenerate_client_js_actions.pl;fp=scripts%2Fgenerate_client_js_actions.pl;h=f7f9a16ef7475e8b8ceeb8671c9ca347b8db94dc;hp=a51c669c7545de62cb343ffdf5f0cacd860f4766;hb=53593baa211863fbf66540cf1bcc36c8fb37257f;hpb=deb4d2dbb676d7d6f69dfe7815d6e0cb09bd4a44 diff --git a/scripts/generate_client_js_actions.pl b/scripts/generate_client_js_actions.pl index a51c669c7..f7f9a16ef 100755 --- a/scripts/generate_client_js_actions.pl +++ b/scripts/generate_client_js_actions.pl @@ -4,10 +4,11 @@ use strict; use warnings; use File::Slurp; +use FindBin; use List::Util qw(first max); use Template; -my $rel_dir = (first { -f "${_}/SL/ClientJS.pm" } qw(. ..)) || die "ClientJS.pm not found"; +my $rel_dir = $FindBin::Bin . '/..'; my @actions; foreach (read_file("${rel_dir}/SL/ClientJS.pm")) { @@ -58,6 +59,6 @@ foreach my $action (@actions) { $output .= sprintf "\n else\%sconsole.log('Unknown action: ' + action[0]);\n", ' ' x (4 + 2 + 6 + 3 + 4 + 2 + $longest + 1); -my $template = Template->new({ RELATIVE => 1 }); +my $template = Template->new({ ABSOLUTE => 1 }); $template->process($rel_dir . '/scripts/generate_client_js_actions.tpl', { actions => $output }, $rel_dir . '/js/client_js.js') || die $template->error(), "\n"; print "js/client_js.js generated automatically.\n";