| # | Line 291 | Line 291 | sub _quotetest { | |
|---|---|---|
| 291 | if ( $char eq $self->{openquote} ) { | |
| 292 | $self->{quotes}=0; | |
| 293 | } | |
| 294 | + | else { |
| 295 | + | $self->_putstore($char); |
| 296 | + | } |
| 297 | } | |
| 298 | # --- Unquoted Context | |
| 299 | elsif ( (($char eq "\"") || ($char eq "\'") || ($char eq "\`")) ) { | |
| # | Line 309 | Line 312 | sub _labeltest { | |
| 312 | my $char=shift; | |
| 313 | ||
| 314 | # Spaces are markers between tags | |
| 315 | < | if ( $char eq " " ) { |
| 315 | > | if ( ($char eq " ") || ($char eq "\n") || ($char eq "\t")) { |
| 316 | $self->_closelabel(); | |
| 317 | } | |
| 318 | # Check for a change in label status | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |