Index: trunk/ippScripts/scripts/register_exp.pl
===================================================================
--- trunk/ippScripts/scripts/register_exp.pl	(revision 23186)
+++ trunk/ippScripts/scripts/register_exp.pl	(revision 23295)
@@ -187,4 +187,6 @@
     my $exit_code = shift;
 
+    $exit_code = $PS_EXIT_PROG_ERROR unless defined $exit_code;
+
     carp($msg);
     if (defined $exp_id and not $no_update) {