Lines Matching defs:object
498 # the object that gets displayed during status updates
505 my $object;
506 if (defined $self->{object}) {
507 $object = $self->{object};
509 $object = $self->{set}->print;
511 $object = "Parameters";
514 $state->say($what." #1#2", $object, $state->ntogo_string);
523 delete $self->{object};
528 sub object($self, $object)
531 $self->{object} = $object;