From 5eab8545c3ca7a9b1d7361b12a78471221395a78 Mon Sep 17 00:00:00 2001 From: Tim Eves Date: Wed, 19 Jun 2024 15:40:12 +0100 Subject: [PATCH] Minor whitespace tidy ups in font[23]go.cgi --- web/server/fonts2go.cgi | 4 ++-- web/server/fonts3go.cgi | 2 -- 2 files changed, 2 insertions(+), 4 deletions(-) diff --git a/web/server/fonts2go.cgi b/web/server/fonts2go.cgi index 35ca4cd..0286872 100755 --- a/web/server/fonts2go.cgi +++ b/web/server/fonts2go.cgi @@ -412,6 +412,7 @@ if ($cgi->param('Select features')) { print p('Existing font:', filefield(-name => 'load_settings'), submit('Load settings')); } + my $parser = new XML::Parser::Expat; $parser->setHandlers( 'Start' => \&sh_form, @@ -471,8 +472,7 @@ elsif ($cgi->param('Get tuned font')) { $suffixOpt = "-n \"$suffix\""; $suffix =~ s/\s//g; $file_name = fontDirName($familytag, $suffix); - } - else { + } else { $file_name = fontDirName($familytag); } my $tunedDir = "$tempDir/$file_name"; diff --git a/web/server/fonts3go.cgi b/web/server/fonts3go.cgi index 8ee0665..e3c5a96 100755 --- a/web/server/fonts3go.cgi +++ b/web/server/fonts3go.cgi @@ -807,7 +807,6 @@ __EOT__ # Append to @fontTag push @fontTag, "$featureTag$atts{'tag'}" } - } } @@ -824,7 +823,6 @@ sub eh_proc } } - # Retrieve 'family' and 'ver' varibles from CGI; detaint them and # determine the familytag value to be used.