| # | Line 77 | Line 77 | sub parse { | |
|---|---|---|
| 77 | $parselabel=shift; | |
| 78 | ||
| 79 | my $file=$self->filetoparse(); | |
| 80 | < | if ( $file ) { |
| 80 | > | if ( -f $file ) { |
| 81 | if ( exists $self->{parsers}{$parselabel} ) { | |
| 82 | $self->verbose("Parsing $parselabel in file $file"); | |
| 83 | $self->{currentparsename}=$parselabel; | |
| # | Line 89 | Line 89 | sub parse { | |
| 89 | } | |
| 90 | } | |
| 91 | else { | |
| 92 | < | $self->error("Cannot parse $parselabel - file not known"); |
| 92 | > | $self->error("Cannot parse \"$parselabel\" - file $file not known"); |
| 93 | } | |
| 94 | } | |
| 95 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |