X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/e7fdb1da83751073b7bcc5488772c7e844789062..6eee850259ed40762406faecaa0cd302bcdf10c6:/SL/InstallationCheck.pm diff --git a/SL/InstallationCheck.pm b/SL/InstallationCheck.pm index 70d6217db..e8670761c 100644 --- a/SL/InstallationCheck.pm +++ b/SL/InstallationCheck.pm @@ -71,6 +71,10 @@ sub template_dirs { sub classes_from_latex { my ($path, $class) = @_; + eval { use String::ShellQuote; 1 } or warn "can't load String::ShellQuote" && return; + $path = shell_quote $path; + $class = shell_quote $class; + open my $pipe, q#egrep -rs '^[\ \t]*# . "$class' $path". q# | sed 's/ //g' | awk -F '{' '{print $2}' | awk -F '}' '{print $1}' |#; my @cls = <$pipe>; close $pipe;