View of /branches/rel-2-4-patches/webwork2/lib/WebworkSOAP/Classes/Password.pm

    1 package WebworkSOAP::Classes::Password;
    2 
    3 =pod
    4 =begin WSDL
    5         _ATTR user_id       $string user_id
    6         _ATTR password      $string password
    7 =end WSDL
    8 =cut
    9 sub new {
   10     my $self = shift;
   11     my $data = shift;
   12     $self = {};
   13     $self->{user_id} = SOAP::Data->type( 'string', $data->user_id );
   14     $self->{password} = SOAP::Data->type( 'string', $data->password );
   15     bless $self;
   16     return $self;
   17 }
   18 
   19 
   20 1;