Skip Menu |

This queue is for tickets about the YAPE-Regex-Explain CPAN distribution.

Report information
The Basics
Id: 14115
Status: resolved
Priority: 0/
Queue: YAPE-Regex-Explain
People
Owner: Nobody in particular
Requestors: jjore [...] cpan.org
Cc:
AdminCc:
Bug Information
Severity: Normal
Broken in: (no value)
Fixed in: 4.00

History Show all quoted text
  Thu Aug 11 11:17:31 2005 Guest - Ticket created
Subject: ->explain() w/ 'silent' or 'regex' is broken
Passing in either parameter 'silent' or 'regex' to ->explain() causes no output to be returned. Both modules were installed from ppd using the normal AS repositories. ActiveState perl 5.8.4 (810) YAPE::Regex::Explain 3.011 YAPE::Regex 3.01 #!perl use strict; use warnings; use YAPE::Regex::Explain; for ( qw( silent regex ) ) { print ">", YAPE::Regex::Explain->new( "..." )->explain( $_ ), "<\n"; }
  Thu Aug 19 16:34:53 2010 gsullivan [...] cpan.org - Correspondence added
From: gsullivan [...] cpan.org
Here is a patch to fix the issue. 'silent' or 'regex' now produces output.
Subject: diffu.txt
--- Explain.pm 2001-05-07 12:18:53.000000000 -0400 +++ Explain.pm.fix 2010-08-19 16:11:03.784319000 -0400 @@ -126,6 +126,7 @@ sub explain { my $self = shift; $using_rex = shift || ''; + @{[ $self->parse ]}; local $^A = ""; $^A = << "END" if not $using_rex; The regular expression:
  Thu Aug 19 16:34:54 2010 The RT System itself - Status changed from 'new' to 'open'
  Wed Sep 01 15:42:41 2010 gsullivan [...] cpan.org - Correspondence added
On Thu Aug 19 16:34:53 2010, GSULLIVAN wrote: Show quoted text
> Here is a patch to fix the issue. > 'silent' or 'regex' now produces output.
The patch has been applied in YAPE::Regex::Explain 4.00. Now, passing in either parameter 'silent' or 'regex' to ->explain() causes output to be returned, as expected.
  Wed Sep 01 15:42:43 2010 gsullivan [...] cpan.org - Status changed from 'open' to 'resolved'
  Wed Sep 01 15:42:55 2010 gsullivan [...] cpan.org - Fixed in 4.00 added