Skip Menu |

This queue is for tickets about the Text-EP3 CPAN distribution.

Report information
The Basics
Id: 6702
Status: new
Priority: 0/
Queue: Text-EP3

People
Owner: Nobody in particular
Requestors: ddrogahn [...] hotmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: (no value)
Fixed in: (no value)



Subject: delimeter & indent bugs & patches
I tried contacting the author (spivey@romulus.ncsc.mil), but the mailserver returns user unknown. Sample patches follow. 1) changing the delimeter doesnt work, the default is still used. variable $self->{DPAT} isnt updated in ep3_delimeter() 2) delimeters that dont appear in the 1st column arent processed (the docs say they should be) ep3.pm : line 1893 (multiple lines changed & added) sub ep3_delimeter { my $self = shift; if (not @_) {return $self->{Delimeter};} my $delim = shift; $self->{DPAT} = quotemeta $delim; $self->{Delimeter} = $delim; } ep3.pm : line 837 in sub ep3_process (one line added) # If this was a directive line ... then lets invoke the directive method if (/^(\s*)$self->{DPAT}\w+/) { # get rid of any leading spaces and save them in case any # directive wants to use them $self->{Indent} = $1; s/^(\s*)//; #--remove leading spaces (the patch)