pass parameters with @_ instead of shift

2024-01-01 20:15:42 +01:00
parent b93c4ee866
commit 115f4dca60
23 changed files with 55 additions and 112 deletions
--- a/website/agenda/planung/show-playout.cgi
+++ b/website/agenda/planung/show-playout.cgi
@@ -73,8 +73,7 @@ template::process( $config, 'print', $params->{template}, $params );
 exit;

 sub showPlayout {
-    my $config  = shift;
-    my $request = shift;
+    my ($config, $request) = @_;

    my $params      = $request->{params}->{checked};
    my $permissions = $request->{permissions};