# You should have received a copy of the GNU General Public License
# along with Koha; if not, see <http://www.gnu.org/licenses>.
-use strict;
-#use warnings; FIXME - Bug 2505
+use Modern::Perl;
use Digest::MD5 qw(md5_base64);
use CGI::Session;
use File::Spec;
$session->param('branch'),
$session->param('branchname'),
$session->param('flags'),
- $session->param('emailaddress'),
- $session->param('branchprinter')
+ $session->param('emailaddress')
);
$cookie = $query->cookie(
-name => 'CGISESSID',