Bug 14522: (QA followup) Remove POD and fix tests

* Change POD to a brief comment
* Fix UT so it doesn't fail on Sundays

Signed-off-by: Tomas Cohen Arazi <tomascohen@unc.edu.ar>

diff --git a/Koha/Calendar.pm b/Koha/Calendar.pm
index be2a6c8..a0b642b 100644 (file)
--- a/Koha/Calendar.pm
+++ b/Koha/Calendar.pm
@@ -95,23 +95,14 @@ sub single_holidays {
     my $cache           = Koha::Cache->get_instance();
     my $single_holidays = $cache->get_from_cache('single_holidays');
 
-=for
-$single_holidays looks like this..
-
-\ {
-   CPL   [
-        [0] 20131122,
-        [1] 20131123,
-        [2] 20131124
-    ],
-   MPL   [
-        [0] 20131122,
-        [1] 20131123,
-        [2] 20131124
-    ]
-}
-
-=cut
+    # $single_holidays looks like:
+    # {
+    #   CPL =>  [
+    #        [0] 20131122,
+    #         ...
+    #    ],
+    #   ...
+    # }
 
     unless ($single_holidays) {
         my $dbh = C4::Context->dbh;

diff --git a/t/db_dependent/Holidays.t b/t/db_dependent/Holidays.t
index e1bf910..fb9b1fa 100755 (executable)
--- a/t/db_dependent/Holidays.t
+++ b/t/db_dependent/Holidays.t
@@ -97,6 +97,9 @@ is( $koha_calendar->is_holiday($monday),    0, 'Monday is not a closed day' );
 is( $koha_calendar->is_holiday($christmas), 1, 'Christmas is a closed day' );
 is( $koha_calendar->is_holiday($newyear),   1, 'New Years day is a closed day' );
 
+$dbh->do("DELETE FROM repeatable_holidays");
+$dbh->do("DELETE FROM special_holidays");
+
 my $custom_holiday = DateTime->new(
     year  => 2013,
     month => 11,