X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=opac%2Fopac-ics.pl;h=d9d90a6711b0242f362c8c71892625619ea99423;hb=f74da1e83442a730e2e56866f57b9f5aef93a3f5;hp=337a939a2b7be0b2ff0019108b30f20f233f8682;hpb=aa114f53499b9cffde0571fe7e08622f9c9a332a;p=koha.git

diff --git a/opac/opac-ics.pl b/opac/opac-ics.pl
index 337a939a2b..d9d90a6711 100755
--- 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::Event::ICal;
 
 use C4::Auth;
 use C4::Koha;
@@ -54,7 +56,7 @@ my ( $borr ) =  GetMemberDetails( $borrowernumber );
 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();