@@ -, +, @@ --- admin/systempreferences.pl | 5 ++--- 1 files changed, 2 insertions(+), 3 deletions(-) --- a/admin/systempreferences.pl +++ a/admin/systempreferences.pl @@ -40,8 +40,7 @@ ALSO : =cut -use strict; -use warnings; +use Modern::Perl; use CGI; use MIME::Base64; @@ -65,7 +64,7 @@ use C4::Output; # Because some things *should* be on more than one tab. # And the tabname is the unique part (the key). -my %tabsysprefs; +state %tabsysprefs; # Acquisitions $tabsysprefs{acquisitions} = "Acquisitions"; --