From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 9 Feb 2015 15:08:05 +0000 (+0100)
Subject: Paginated-Controller-Helfer: undef-Warnungen vermeiden
X-Git-Tag: release-3.2.0~40
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=124e72be4112c79f697b538a46c9435ffd0c72f3;p=kivitendo-erp.git

Paginated-Controller-Helfer: undef-Warnungen vermeiden
---

diff --git a/SL/Controller/Helper/GetModels/Paginated.pm b/SL/Controller/Helper/GetModels/Paginated.pm
index ad5e10c14..d900c18be 100644
--- a/SL/Controller/Helper/GetModels/Paginated.pm
+++ b/SL/Controller/Helper/GetModels/Paginated.pm
@@ -32,8 +32,8 @@ sub read_params {
   my $source = $self->get_models->source;
 
   my $from_form = {
-    page            => $source->{ $self->form_params->[0] } || 1,
-    per_page        => $source->{ $self->form_params->[1] } * 1,
+    page            =>  $source->{ $self->form_params->[0] } || 1,
+    per_page        => ($source->{ $self->form_params->[1] } // 0) * 1,
   };
 
 #  my $priv              = _priv($self);