Changeset 1626

Show
Ignore:
Timestamp:
08/29/06 22:28:12
Author:
miyagawa
Message:

fixed config_path in ConfigLoader? to fix rewrite tasks. via http://d.hatena.ne.jp/charsbar/20060829/1156856682

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/plagger/lib/Plagger.pm

    r1588 r1626  
    4545 
    4646    my $loader = Plagger::ConfigLoader->new; 
    47     my $config = $loader->load($opt{config}); 
     47    my $config = $loader->load($opt{config}, $self); 
    4848 
    4949    $loader->load_include($config); 

  • trunk/plagger/lib/Plagger/ConfigLoader.pm

    r1479 r1626  
    1010 
    1111sub load { 
    12     my($self, $stuff) = @_; 
     12    my($self, $stuff, $context) = @_; 
    1313 
    1414    my $config; 
    1515    if (-e $stuff && -r _) { 
    1616        $config = YAML::LoadFile($stuff); 
    17         $self->{config_path} = $stuff; 
     17        $context->{config_path} = $stuff if $context; 
    1818    } elsif (ref($stuff) && ref($stuff) eq 'SCALAR') { 
    1919        $config = YAML::Load(${$stuff});