=cut
use strict;
use Modern::Perl;
use warnings;
use CGI;
use MIME::Base64;
# 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";
-