Mailinglist Archive: yast-commit (1535 mails)

[jdsn@xxxxxxxxxxxxxxxx]

Author: jdsn
Date: Thu Oct 22 11:01:36 2009
New Revision: 59156

URL: http://svn.opensuse.org/viewcvs/yast?rev=59156&view=rev
Log:
set arguments one by one, do not overwrite
return missing arguments hash in missing info state

Modified:
    trunk/registration/src/modules/YSR.pm_web

Modified: trunk/registration/src/modules/YSR.pm_web
URL: 
http://svn.opensuse.org/viewcvs/yast/trunk/registration/src/modules/YSR.pm_web?rev=59156&r1=59155&r2=59156&view=diff
==============================================================================
--- trunk/registration/src/modules/YSR.pm_web (original)
+++ trunk/registration/src/modules/YSR.pm_web Thu Oct 22 11:01:36 2009
@@ -221,7 +221,11 @@
     }
 
     # set arguments
-    $self->set_args($arguments);
+    # must be set one for one, otherwise other data would be overwritten
+    foreach my $key ( keys %{$arguments} )
+    {
+        $self->set_arg( $key, ${$arguments}{$key} );
+    }
 
     # run registration
     my $exitcode = 1;
@@ -277,6 +281,8 @@
     elsif ( $exitcode == 4 )
     {
         $return{'missinginfo'} = 'Missing Information';
+        my $margs = $self->get_args() || {};
+        $return{'missingarguments'} = $margs;
     }
     elsif ( $exitcode == 100 || $exitcode == 101 )
     {

--
To unsubscribe, e-mail: yast-commit+unsubscribe@xxxxxxxxxxxx
For additional commands, e-mail: yast-commit+help@xxxxxxxxxxxx