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/select-series.cgi
+++ b/website/agenda/planung/select-series.cgi
@@ -64,8 +64,7 @@ unless ( $permissions->{read_series} == 1 ) {
 show_series( $config, $request );

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

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