Changeset 39 in ProjectBuilder

Timestamp:

Aug 9, 2007, 6:37:14 PM (17 years ago)

Author:

Bruno Cornec

Message:

Add a patch to AppConfig::File to solve the issue around automatically create '1' key entry in all hashes

Location:

devel

Files:

• pb-doc/AppConfig::File.patch (added)
• pb/lib/pb.pm (modified) (3 diffs)

devel/pb/lib/pb.pm

@@ -7 +7 @@
 #
 use strict;
-use AppConfig qw(ARGCOUNT_HASH);
+use AppConfig qw(ARGCOUNT_HASH ARGCOUNT_ONE);
 use Data::Dumper;
 
@@ -28 +28 @@
                             GLOBAL => {
                                 # Each conf item is a hash
-                                DEFAULT => { },
-                                ARGCOUNT => AppConfig::ARGCOUNT_ONE,
-                            }
+                                ARGCOUNT => ARGCOUNT_ONE,
+                            },
                         });
 $config->file($conffile);
@@ -51 +50 @@
 my $config = AppConfig->new({
                             # Auto Create variables mentioned in Conf file
-                            CREATE => 1,
                             DEBUG => $trace,
+                            CREATE => '1',
                             GLOBAL => {
                                 # Each conf item is a hash
-                                DEFAULT => { },
-                                ARGCOUNT => AppConfig::ARGCOUNT_HASH,
-                            }
+                                ARGCOUNT => ARGCOUNT_HASH,
+                            },
                         });
 $config->file($conffile);