[Catalyst-commits] r7744 - in Catalyst-Model-SOAP/1.0/trunk: lib/Catalyst/Model t/lib

[ruoso at dev.catalyst.perl.org]

Author: ruoso
Date: 2008-05-12 20:39:14 +0100 (Mon, 12 May 2008)
New Revision: 7744

Modified:
   Catalyst-Model-SOAP/1.0/trunk/lib/Catalyst/Model/SOAP.pm
   Catalyst-Model-SOAP/1.0/trunk/t/lib/MyXMLModule.pm
Log:
avoid having a hack indexed

Modified: Catalyst-Model-SOAP/1.0/trunk/lib/Catalyst/Model/SOAP.pm
===================================================================
--- Catalyst-Model-SOAP/1.0/trunk/lib/Catalyst/Model/SOAP.pm	2008-05-12 19:38:30 UTC (rev 7743)
+++ Catalyst-Model-SOAP/1.0/trunk/lib/Catalyst/Model/SOAP.pm	2008-05-12 19:39:14 UTC (rev 7744)
@@ -5,7 +5,7 @@
     use XML::Compile::Util qw/pack_type/;
     use List::Util qw/first/;
     use base qw(Catalyst::Model);
-    our $VERSION = '0.0.6';
+    our $VERSION = '0.0.7';
 
 
     __PACKAGE__->mk_accessors('transport');
@@ -179,7 +179,9 @@
 
 
 {   use XML::Compile::Schema::BuiltInTypes;
-    package XML::Compile::Schema::BuiltInTypes;
+    package
+      # avoid being indexed...
+      XML::Compile::Schema::BuiltInTypes;
 
     $XML::Compile::Schema::BuiltInTypes::builtin_types{QName}{parse} =
      sub { my ($qname, $node) = @_;

Modified: Catalyst-Model-SOAP/1.0/trunk/t/lib/MyXMLModule.pm
===================================================================
--- Catalyst-Model-SOAP/1.0/trunk/t/lib/MyXMLModule.pm	2008-05-12 19:38:30 UTC (rev 7743)
+++ Catalyst-Model-SOAP/1.0/trunk/t/lib/MyXMLModule.pm	2008-05-12 19:39:14 UTC (rev 7744)
@@ -21,6 +21,8 @@
            (bless { name => 'op5', service => 'sv2', port => 'pt4' }, MyXML::Operation),
           )
     }
+    sub importDefinitions {
+    }
 };
 {
     package MyXML::Operation;