Changeset 2216 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Cli/Object.pm
- Timestamp:
- 02/21/19 22:13:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Cli/Object.pm
r2213 r2216 370 370 print $OUT "Selecting $env->otype " . join(', ', map { $_->id } @objs) . "\n"; 371 371 LATMOS::Accounts::Cli::Object->new( 372 Parent => $self, 372 373 Context => $env->Context, 373 374 otype => $totype, … … 511 512 my $name = shift or return; 512 513 513 if (!exists($self->{funcs}{$name})) { 514 $self->print("No command $name found\n"); 515 } elsif (my $otype = $self->{funcs}{$name}{proxy}) { 514 if (my $otype = $self->{funcs}{$name}{proxy}) { 516 515 $self->Context->{objs} = $self->objs; 517 516 LATMOS::Accounts::Cli->new( 517 Parent => $self, # Look useless 518 518 Context => $self->Context, 519 519 )->run(
Note: See TracChangeset
for help on using the changeset viewer.