lib: replace shift by @_

2023-05-18 11:17:14 +02:00
parent 611fad43d4
commit 3a1a118eeb
26 changed files with 184 additions and 390 deletions
--- a/lib/calcms/calendar.pm
+++ b/lib/calcms/calendar.pm
@@ -289,9 +289,7 @@ sub render($$$$) {
 }

 sub get_calendar_weeks($$$) {
-    my $config = shift;
-    my $start  = shift;
-    my $end    = shift;
+    my ($config, $start, $end) = @_;

    $start = time::date_to_array($start);
    $end   = time::date_to_array($end);
@@ -407,8 +405,7 @@ sub getWeeksOfMonth($$) {
 }

 sub check_params($$) {
-    my $config = shift;
-    my $params = shift;
+    my ($config, $params) = @_;

    #get start and stop from projects
    my $range      = project::get_date_range($config);