Rely on C89 variadic prototypes

[perl5.git] / Porting / checkcfgvar.pl

diff --git a/Porting/checkcfgvar.pl b/Porting/checkcfgvar.pl
index 3ebde3a..601be18 100755 (executable)
--- a/Porting/checkcfgvar.pl
+++ b/Porting/checkcfgvar.pl
@@ -34,7 +34,9 @@ GetOptions (
     "tap"      => \$tap,
     ) or usage (1);
 
-require 'regen/regen_lib.pl' if $opt_r;
+$default and $default =~ s/^'(.*)'$/$1/; # Will be quoted on generation
+
+require './regen/regen_lib.pl' if $opt_r;
 
 my $MASTER_CFG = "config_h.SH";
 # Inclusive bounds on the main part of the file, $section == 1 below: