diff --git a/C4/Auth.pm b/C4/Auth.pm index 9c52c79bf0..5d3155030b 100644 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -93,7 +93,7 @@ C4::Auth - Authenticates Koha users use C4::Auth; use C4::Output; - my $query = new CGI; + my $query = CGI->new; my ($template, $borrowernumber, $cookie) = get_template_and_user( diff --git a/C4/Context.pm b/C4/Context.pm index 58a6ad5e05..2dab73e9d1 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -211,8 +211,8 @@ sub import { =head2 new - $context = new C4::Context; - $context = new C4::Context("/path/to/koha-conf.xml"); + $context = C4::Context->new; + $context = C4::Context->new("/path/to/koha-conf.xml"); Allocates a new context. Initializes the context from the specified file, which defaults to either the file given by the C<$KOHA_CONF>