Changeset 1297 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh

Timestamp:

03/11/16 12:22:43 (8 years ago)

Author:

sdipsl

Message:

• correct spurious copy/paste/keyboard shortcut side effects

File:

• trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh (modified) (2 diffs)

trunk/libIGCM/libIGCM_sys/libIGCM_sys_ada.ksh

@@ -1251 +1251 @@
 #D-
 function IGCM_sys_ListJobInQueue {
-  IGCM_debug   cat ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$
-    \rm ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$
-    IGCM_debug_PopStack "IGCM_sys_atlas"
-    return 1
-  else
-    IGCM_debug_PopStack "IGCM_sys_atlas"
-    return 0
-  fi
-
-  IGCM_debug_PopStack "IGCM_sys_atlas"
-}
-
-_PushStack "IGCM_sys_ListJobInQueue"
+  IGCM_debug_PushStack "IGCM_sys_ListJobInQueue"
   if ( $DEBUG_sys ) ; then
     echo "IGCM_sys_ListJobInQueue"
@@ -1298 +1286 @@
   if [ ${status} -gt 0 ] ; then
     echo "IGCM_sys_atlas : error code ${status}"
- 
+
+    cat ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$ 
+    \rm ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$ 
+                    IGCM_debug_PopStack "IGCM_sys_atlas" 
+            return 1 
+  else 
+    IGCM_debug_PopStack "IGCM_sys_atlas" 
+                    return 0 
+  fi 
+
+  IGCM_debug_PopStack "IGCM_sys_atlas" 
+}