Changeset a4057fa6cfc06414b67428e5d02487354c0ddfcf in xas


Ignore:
Timestamp:
11/12/14 11:40:45 (5 years ago)
Author:
Kevin L. Esteb <kevin@…>
Branches:
master
Children:
356a9c26c4b3ecd30059f983907d4b00a270c27e
Parents:
236334c8401be0a7ef32f240761da5d0a05c467d
git-author:
Kevin L. Esteb <kevin@…> (11/12/14 11:40:45)
git-committer:
Kevin L. Esteb <kevin@…> (11/12/14 11:40:45)
Message:

Fixing some defination issues

Location:
trunk/lib/XAS/Lib
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/lib/XAS/Lib/App/Daemon.pm

    ra44b49dc5d6a1ef85735cfa67215621c6b81a643 ra4057fa6cfc06414b67428e5d02487354c0ddfcf  
    130130    my $options = $self->SUPER::_default_options(); 
    131131 
    132     $self->{daemon} = FALSE; 
     132    $self->{daemon}  = FALSE; 
    133133 
    134134    $options->{'daemon'} = \$self->{daemon}; 
    135    
     135 
    136136    $options->{'cfgfile=s'} = sub {  
    137137        my $cfgfile = File($_[1]); 
     
    140140 
    141141    $options->{'pidfile=s'} = sub {  
    142         my $pidfile = File($_[1]);  
     142        my $pidfile = File($_[1]); 
    143143        $self->env->pidfile($pidfile); 
    144144    }; 
  • trunk/lib/XAS/Lib/App/Services.pm

    ra44b49dc5d6a1ef85735cfa67215621c6b81a643 ra4057fa6cfc06414b67428e5d02487354c0ddfcf  
    6767    my $options = $self->SUPER::_default_options(); 
    6868 
    69     $self->{daemon} = FALSE; 
     69    $self->{daemon}  = FALSE; 
     70    $self->{cfgfile} = $self->env->cfgfile; 
     71    $self->{pidfile} = $self->env->pidfile; 
    7072 
    7173    $options->{'daemon'} = \$self->{daemon}; 
    7274 
    73     $options->{'install'}   = sub {  
     75    $options->{'install'} = sub {  
    7476        $self->install_service();  
    7577        exit 0;  
     
    8284 
    8385    $options->{'pidfile=s'} = sub {  
    84         my $pidfile = File($_[1]);  
     86        my $pidfile = File($_[1]); 
    8587        $self->env->pidfile($pidfile); 
    8688    }; 
    8789 
    8890    $options->{'cfgfile=s'} = sub {  
    89         my $cfgfile = File($_[1]);  
     91        my $cfgfile = File($_[1]); 
    9092        $self->env->cfgfile($cfgfile); 
    9193    }; 
  • trunk/lib/XAS/Lib/Mixins/Configs.pm

    r02e63ea8e5fd59bb0d24401148b48650779fcc52 ra4057fa6cfc06414b67428e5d02487354c0ddfcf  
    2020    my $self = shift; 
    2121    my ($filename, $handle) = $self->validate_params(\@_, [ 
    22         { isa => 'Badger::Filesystem::File' }, 
     22        { optional => 1, isa => 'Badger::Filesystem::File', default => $self->env->cfgfile }, 
    2323        { optional => 1, default => 'cfg' }, 
    2424    ]); 
    25      
     25 
    2626    $self->{$handle} = Config::IniFiles->new( 
    27         -file => $self->filename->path, 
     27        -file => $filename->path, 
    2828    ) or do { 
    2929        $self->log->warn(compress(join('', @Config::IniFiles::errors))); 
     
    3131            dotid($self->class) . '.load_config.badini', 
    3232            'badini', 
    33             $self->filename->path 
     33            $filename->path 
    3434        ); 
    3535    }; 
Note: See TracChangeset for help on using the changeset viewer.