use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use CGI q(-utf8);
use C4::Output;
use C4::Auth;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use CGI qw ( -utf8 );
use C4::Auth;
use C4::Output;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use Date::Calc qw( Today );
use Koha::Util::FrameworkPlugin qw(wrapper);
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
-
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
use CGI qw ( -utf8 );
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
-
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
use CGI qw ( -utf8 );
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
-
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
use CGI qw ( -utf8 );
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
-
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
use CGI qw ( -utf8 );
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
-
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
use CGI qw ( -utf8 );
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
=cut
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use CGI qw ( -utf8 );
use C4::Output;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
+
use C4::Auth;
use CGI qw ( -utf8 );
use C4::Context;
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
-#use warnings; FIXME - Bug 2505
use Koha::Util::FrameworkPlugin qw(wrapper);
use C4::Auth;