cvsuser 02/02/18 10:43:59
Modified: P5EEx/Blue/P5EEx/Blue Service.pm
Log:
fixed a bug, changing the service_type() from an instance method to a class method
Revision Changes Path
1.8 +2 -2 p5ee/P5EEx/Blue/P5EEx/Blue/Service.pm
Index: Service.pm
===================================================================
RCS file: /cvs/public/p5ee/P5EEx/Blue/P5EEx/Blue/Service.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -w -r1.7 -r1.8
--- Service.pm 25 Jan 2002 19:24:28 -0000 1.7
+++ Service.pm 18 Feb 2002 18:43:59 -0000 1.8
@@ -1,6 +1,6 @@
#############################################################################
-## $Id: Service.pm,v 1.7 2002/01/25 19:24:28 spadkins Exp $
+## $Id: Service.pm,v 1.8 2002/02/18 18:43:59 spadkins Exp $
#############################################################################
package P5EEx::Blue::Service;
@@ -81,7 +81,7 @@
my ($self, $context, $type, $lcf_type);
$context = P5EEx::Blue::P5EE->context();
- $type = $self->service_type();
+ $type = $class->service_type();
$lcf_type = lcfirst($type);
if ($#_ % 2 == 0) { # odd number of args
$self = $context->service($type, @_, "${lcf_type}Class", $class);
