-# Test browser, and direct User where to turn off Javascript if necessary
-# only display message if Javascript is currently enabled
-if (${Header::javascript}) {
-print <<END
-<script type='text/javascript'>\n
-if(navigator.platform.indexOf("MacPPC")>(-1)){
- document.write(
- "<center><p>"
- + "$Lang::tr{'javascript menu error1'}"
- + " <a href='/cgi-bin/gui.cgi'>$Lang::tr{'gui settings'}</a> "
- + "$Lang::tr{'javascript menu error2'}"
- + "</p></center>"
- )
+&Header::openbox('100%', 'left', $Lang::tr{'quick control'});
+# read in the profile names into @profilenames.
+my $c;
+my $maxprofiles = 5;
+my @profilenames = ();
+
+for ($c = 1; $c <= $maxprofiles; $c++)
+{
+ my %temppppsettings = ();
+ $temppppsettings{'PROFILENAME'} = '';
+ &General::readhash("${General::swroot}/ppp/settings-$c", \%temppppsettings);
+ $profilenames[$c] = $temppppsettings{'PROFILENAME'};
+}
+my %selected;
+for ($c = 1; $c <= $maxprofiles; $c++) {
+ $selected{'PROFILE'}{$c} = '';