Browse Source

Fix Stray Plus Character in Perl Config Script

Andy 5 years ago
parent
commit
3d3bf7a859
1 changed files with 1 additions and 1 deletions
  1. 1 1
      config/conf.pl

+ 1 - 1
config/conf.pl

@@ -3008,7 +3008,7 @@ sub command325 {
     }
     }
     print "Hide download links for SVG objects? (y/n) [$WHT$default_value$NRM]: $WHT";
     print "Hide download links for SVG objects? (y/n) [$WHT$default_value$NRM]: $WHT";
     $block_svg_download = <STDIN>;
     $block_svg_download = <STDIN>;
-+    if ( ( $block_svg_download =~ /^y\n/i ) || ( ( $block_svg_download =~ /^\n/ ) && ( $default_value eq "y" ) ) ) {
+    if ( ( $block_svg_download =~ /^y\n/i ) || ( ( $block_svg_download =~ /^\n/ ) && ( $default_value eq "y" ) ) ) {
         $block_svg_download = 'true';
         $block_svg_download = 'true';
     } else {
     } else {
         $block_svg_download = 'false';
         $block_svg_download = 'false';