Changeset 39


Ignore:
Timestamp:
Aug 9, 2007, 6:37:14 PM (10 years ago)
Author:
bruno
Message:

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

Location:
devel
Files:
1 added
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/lib/pb.pm

    r38 r39  
    77#
    88use strict;
    9 use AppConfig qw(ARGCOUNT_HASH);
     9use AppConfig qw(ARGCOUNT_HASH ARGCOUNT_ONE);
    1010use Data::Dumper;
    1111
     
    2828                            GLOBAL => {
    2929                                # Each conf item is a hash
    30                                 DEFAULT => { },
    31                                 ARGCOUNT => AppConfig::ARGCOUNT_ONE,
    32                             }
     30                                ARGCOUNT => ARGCOUNT_ONE,
     31                            },
    3332                        });
    3433$config->file($conffile);
     
    5150my $config = AppConfig->new({
    5251                            # Auto Create variables mentioned in Conf file
    53                             CREATE => 1,
    5452                            DEBUG => $trace,
     53                            CREATE => '1',
    5554                            GLOBAL => {
    5655                                # Each conf item is a hash
    57                                 DEFAULT => { },
    58                                 ARGCOUNT => AppConfig::ARGCOUNT_HASH,
    59                             }
     56                                ARGCOUNT => ARGCOUNT_HASH,
     57                            },
    6058                        });
    6159$config->file($conffile);
Note: See TracChangeset for help on using the changeset viewer.