diff --git a/bin/update-devel b/bin/update-devel index 4250a702b..f36d3c721 100755 --- a/bin/update-devel +++ b/bin/update-devel @@ -15,7 +15,7 @@ use Cwd qw(cwd); my %opt; GetOptions('help|h' => \$opt{'help'}, 'product|p=s' => \$opt{'product'}, - 'theme|t!' => \$opt{'theme'}); + 'theme|p:s' => \$opt{'theme'}); pod2usage(0) if ($opt{'help'} || !$opt{'product'}); # Get current path @@ -38,8 +38,9 @@ if ($p =~ /^webmin$|^usermin$/i) { $path =~ s/webmin/$p/; } my $cmd = "cd $path && ./update-from-repo.sh -force"; - if ($opt{'theme'}) { - $cmd = "cd $path/authentic-theme && ./theme-update.sh -force"; + if (defined($opt{'theme'})) { + my $tver = $opt{'theme'} ? " -release:$opt{'theme'}" : ""; + $cmd = "cd $path/authentic-theme && ./theme-update.sh$tver -force"; } system($cmd); } else { diff --git a/web-lib-funcs.pl b/web-lib-funcs.pl index 9bbfd9355..12d1b573e 100755 --- a/web-lib-funcs.pl +++ b/web-lib-funcs.pl @@ -1614,13 +1614,27 @@ elsif ($ENV{'REQUEST_URI'} =~ /json-error=1/) { } else { &header($text{'error'}, ""); - print "
| $text{'error_file'} | ", "$text{'error_line'} | ", "$text{'error_sub'} |