Index: /trunk/psconfig/psbuild
===================================================================
--- /trunk/psconfig/psbuild	(revision 22739)
+++ /trunk/psconfig/psbuild	(revision 22740)
@@ -247,12 +247,12 @@
 
         if (-e "Build.PL") {
-            vsystem ("$psperlbuild");
-            if ($?) { &failure($module[$i], "failure in perl Build.PL"); }
-
-            vsystem ("./Build");
-            if ($?) { &failure($module[$i], "failure in Build"); }
-
-            vsystem ("./Build install");
-            if ($?) { &failure($module[$i], "failure in Build install"); }
+            $status = vsystem ("$psperlbuild");
+            if ($status) { &failure($module[$i], "failure in perl Build.PL"); }
+
+            $status = vsystem ("./Build");
+            if ($status) { &failure($module[$i], "failure in Build"); }
+
+            $status = vsystem ("./Build install");
+            if ($status) { &failure($module[$i], "failure in Build install"); }
 
             next;
@@ -272,11 +272,11 @@
         if ($developer && $rebuild_this && ! -e "configure" && -e "autogen.sh") {
             $skip_configure = 1;
-            vsystem ("$psautogen $psopts");
-            if ($?) { &failure($module[$i], "failure in psautogen"); }
+            $status = vsystem ("$psautogen $psopts");
+            if ($status) { &failure($module[$i], "failure in psautogen"); }
         }
 
         if ($rebuild_this && -e "configure" && !$skip_configure) {
-            vsystem ("$psconfigure $psopts");
-            if ($?) { &failure($module[$i], "failure in psconfigure"); }
+            $status = vsystem ("$psconfigure $psopts");
+            if ($status) { &failure($module[$i], "failure in psconfigure"); }
         }
 
@@ -288,13 +288,13 @@
 
         if ($clean) {
-            vsystem ("$make clean");
-            if ($?) { &failure($module[$i], "failure in make clean"); }
-        }
-
-        vsystem ("$make");
-        if ($?) { &failure($module[$i], "failure in make"); }
-
-        vsystem ("$make install");
-        if ($?) { &failure($module[$i], "failure in make install"); }
+            $status = vsystem ("$make clean");
+            if ($status) { &failure($module[$i], "failure in make clean"); }
+        }
+
+        $status = vsystem ("$make");
+        if ($status) { &failure($module[$i], "failure in make"); }
+
+        $status = vsystem ("$make install");
+        if ($status) { &failure($module[$i], "failure in make install"); }
 
         print "*** done with $module[$i] ***\n";