Changeset 4316

Timestamp:

01/10/08 01:11:17 (5 years ago)

Author:

cho45

Message:

lang/perl/Config-Pit/trunk/lib/Config/Pit.pm:

Apply quote at ppit set.

Files:

• lang/perl/Config-Pit/trunk/lib/Config/Pit.pm (modified) (1 diff)

lang/perl/Config-Pit/trunk/lib/Config/Pit.pm

@@ -85 +85 @@
 
 sub pipe {
+        local $YAML::Syck::ImplicitTyping = 1;
+        local $YAML::Syck::SingleQuote    = 1;
         -t STDOUT ? print STDERR 'do not output to tty.' :  print Dump(get(shift)), "\n"; ## no critic
 }