Hi all,
I'm completely stumped by this
sub get_action_docs {
...
$@ = '';
($@ = "No known action '$action'\n"), return
unless $actions->{$action};
...
I found that it is being called as:
if (@{$self->{args}{ARGV}}) {
my $msg =
$self->get_action_docs($self->{args}{ARGV}[0], $actions) ||
"[EMAIL PROTECTED]";
print $msg;
return;
}
Why not just eval {$self->get_actions_docs(...)} and then have it die if
it is upset?
--Eric
--
"I've often gotten the feeling that the only people who have learned
from computer assisted instruction are the authors."
--Ben Schneiderman
---------------------------------------------------
http://scratchcomputing.com
---------------------------------------------------
