Index: /trunk/Nebulous-Server/lib/Nebulous/Server/SOAP.pm
===================================================================
--- /trunk/Nebulous-Server/lib/Nebulous/Server/SOAP.pm	(revision 2917)
+++ /trunk/Nebulous-Server/lib/Nebulous/Server/SOAP.pm	(revision 2917)
@@ -0,0 +1,27 @@
+# Copyright (c) 2004  Joshua Hoblitt
+#
+# $Id: SOAP.pm,v 1.1 2005-01-06 03:56:43 jhoblitt Exp $
+
+package PS::IPP::IData::Server::SOAP;
+
+use strict;
+use warnings FATAL => qw( all );
+
+our $VERSION = '0.01';
+
+use PS::IPP::IData::Server;
+use SOAP::Lite;
+import SOAP::Data 'name'; 
+
+our $AUTOLOAD;
+
+sub AUTOLOAD {
+    my $self = shift;
+
+    my ( $package, $method ) = $AUTOLOAD =~ m/(?:(.+)::)([^:]+)$/;
+    return undef if $method eq 'DESTROY';
+
+    return name( result => PS::IPP::IData::Server->$method( @_ ) );
+}
+
+1;
Index: /trunk/Nebulous/lib/Nebulous/Server/SOAP.pm
===================================================================
--- /trunk/Nebulous/lib/Nebulous/Server/SOAP.pm	(revision 2917)
+++ /trunk/Nebulous/lib/Nebulous/Server/SOAP.pm	(revision 2917)
@@ -0,0 +1,27 @@
+# Copyright (c) 2004  Joshua Hoblitt
+#
+# $Id: SOAP.pm,v 1.1 2005-01-06 03:56:43 jhoblitt Exp $
+
+package PS::IPP::IData::Server::SOAP;
+
+use strict;
+use warnings FATAL => qw( all );
+
+our $VERSION = '0.01';
+
+use PS::IPP::IData::Server;
+use SOAP::Lite;
+import SOAP::Data 'name'; 
+
+our $AUTOLOAD;
+
+sub AUTOLOAD {
+    my $self = shift;
+
+    my ( $package, $method ) = $AUTOLOAD =~ m/(?:(.+)::)([^:]+)$/;
+    return undef if $method eq 'DESTROY';
+
+    return name( result => PS::IPP::IData::Server->$method( @_ ) );
+}
+
+1;
