projects
/
irspy-moved-to-github.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5077785
)
_run_test() can now cope with complex text-class names such as Search::Title
author
Mike Taylor
<mike@indexdata.com>
Wed, 21 Jun 2006 16:24:55 +0000
(16:24 +0000)
committer
Mike Taylor
<mike@indexdata.com>
Wed, 21 Jun 2006 16:24:55 +0000
(16:24 +0000)
lib/ZOOM/IRSpy.pm
patch
|
blob
|
history
diff --git
a/lib/ZOOM/IRSpy.pm
b/lib/ZOOM/IRSpy.pm
index
da496e0
..
0fb95f7
100644
(file)
--- a/
lib/ZOOM/IRSpy.pm
+++ b/
lib/ZOOM/IRSpy.pm
@@
-1,4
+1,4
@@
-# $Id: IRSpy.pm,v 1.5 2006-06-21 16:09:02 mike Exp $
+# $Id: IRSpy.pm,v 1.6 2006-06-21 16:24:55 mike Exp $
package ZOOM::IRSpy;
@@
-189,7
+189,9
@@
sub _run_test {
my($tname) = @_;
eval {
- require "ZOOM/IRSpy/Test/$tname.pm";
+ my $slashSeperatedTname = $tname;
+ $slashSeperatedTname =~ s/::/\//g;
+ require "ZOOM/IRSpy/Test/$slashSeperatedTname.pm";
}; if ($@) {
$this->log("warn", "can't load test '$tname': skipping",
$@ =~ /^Can.t locate/ ? () : " ($@)");