X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/2aaa83f4b2d4f9ebbbc144b1bbfbf7f4d3251577..a73fd639b91259eb1011a2d448b53df120d4514b:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index d1dbfb631..c62c8ad0d 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -692,7 +692,7 @@ sub redirect {
 
     ($script, $argv) = split(/\?/, $self->{callback}, 2);
     $script =~ s|.*/||;
-    $script =~ s|[^a-zA-Z_\.]||g;
+    $script =~ s|[^a-zA-Z0-9_\.]||g;
     exec("perl", "$script", $argv);
 
   } else {