@@ -, +, @@ --- C4/Reports/Guided.pm | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) --- a/C4/Reports/Guided.pm +++ a/C4/Reports/Guided.pm @@ -473,6 +473,7 @@ Returns id of the newly created report sub save_report { my ( $borrowernumber, $sql, $name, $type, $notes, $cache_expiry, $public ) = @_; + $cache_expiry ||= 0; my $dbh = C4::Context->dbh(); $sql =~ s/(\s*\;\s*)$//; # removes trailing whitespace and /;/ my $query = --