scip/Config-General
1
0
Fork 0
mirror of https://codeberg.org/scip/Config-General.git synced 2025-12-16 20:21:01 +01:00
Code Issues Packages Projects Releases Wiki Activity

add new flag AlwaysQuoteOutput for write quoting

Browse Source
This commit is contained in:
Thomas von Dein
2025-01-07 10:36:02 +01:00
parent 35dc4c10c9
commit 3937d2423e
3 changed files with 20 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
t/cfg.59 Normal file
View File

@@ -0,0 +1 @@
foo = "bar baz"

11
t/run.t
View File

@@ -8,7 +8,7 @@
use Data::Dumper;
use Test::More tests => 78;
use Test::More tests => 79;
#use Test::More qw(no_plan);
# ahem, we deliver the test code with a local copy of
@@ -791,3 +791,12 @@ foreach my $def (keys %defs) {
my %hash = $conf->getall();
is_deeply \%hash, $expected58, "UseApacheIfDefine, -Define => $def";
}
# force quoting
my $cfg59 = "t/cfg.59";
my $expected59 = qq(foo "bar baz"
); # newline is important here, as we check write output
my $conf = Config::General->new(-ConfigFile => $cfg59,
-AlwaysQuoteOutput => 1);
my $got59 = $conf->save_string();
is_deeply \$expected59, \$got59, "quotes";