1;
-require "$form->{path}/common.pl";
+require "bin/mozilla/common.pl";
# end of main
my %options;
- my @hidden = qw(login path password type format);
+ my @hidden = qw(login password type format);
if (($form->{"type"} ne "stylesheet") && !$form->{"edit"}) {
$options{"SHOW_EDIT_OPTIONS"} = 1;
my (@values, $file, $setup);
while (($file, $setup) = each(%formname_setup)) {
- next unless (!ref($setup) || $setup->{$format});
+ next if ref($setup) && !$setup->{$format};
push(@values,
{ "value" => $file,