projects
/
koha_fer
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
do some validation of the KohaOpacRecentSearches cookie
[koha_fer]
/
opac
/
opac-ics.pl
diff --git
a/opac/opac-ics.pl
b/opac/opac-ics.pl
index
337a939
..
d9d90a6
100755
(executable)
--- a/
opac/opac-ics.pl
+++ b/
opac/opac-ics.pl
@@
-28,6
+28,8
@@
use Data::ICal::Entry::Event;
use DateTime;
use DateTime::Format::ICal;
use Date::Calc qw (Parse_Date);
use DateTime;
use DateTime::Format::ICal;
use Date::Calc qw (Parse_Date);
+use DateTime;
+use DateTime::Event::ICal;
use C4::Auth;
use C4::Koha;
use C4::Auth;
use C4::Koha;
@@
-54,7
+56,7
@@
my ( $borr ) = GetMemberDetails( $borrowernumber );
my $calendar = Data::ICal->new();
# get issued items ....
my $calendar = Data::ICal->new();
# get issued items ....
-my
($issues)
= GetPendingIssues($borrowernumber);
+my
$issues
= GetPendingIssues($borrowernumber);
foreach my $issue ( @$issues ) {
my $vevent = Data::ICal::Entry::Event->new();
foreach my $issue ( @$issues ) {
my $vevent = Data::ICal::Entry::Event->new();