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>
This commit is contained in:
Kyle M Hall 2015-10-02 11:01:19 -04:00 committed by Tomas Cohen Arazi
parent ff693f14fc
commit 6d40b4e320
2 changed files with 11 additions and 17 deletions

View File

@ -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;

View File

@ -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,