Author: dom Date: 2005-07-22 17:22:33 +0100 (Fri, 22 Jul 2005) New Revision: 662
Modified: trunk/lib/OpenGuides/Config.pm Log: Non-existent config files aren't always an error.
Modified: trunk/lib/OpenGuides/Config.pm =================================================================== --- trunk/lib/OpenGuides/Config.pm 2005-07-22 16:17:35 UTC (rev 661) +++ trunk/lib/OpenGuides/Config.pm 2005-07-22 16:22:33 UTC (rev 662) @@ -83,7 +83,7 @@ my %stored; if ( $args{file} ) { my $read_config = Config::Tiny->read( $args{file} ) or - die "Cannot read config file $args{file}"; + warn "Cannot read config file $args{file}"; %stored = $read_config ? %{ $read_config->{_} } : (); } elsif ( $args{vars} ) { %stored = %{ $args{vars} };