===================================================================
RCS file: /home/cvs/OpenXM/src/k097/lib/ox/ox.k,v
retrieving revision 1.11
retrieving revision 1.14
diff -u -p -r1.11 -r1.14
--- OpenXM/src/k097/lib/ox/ox.k	2001/01/26 12:24:57	1.11
+++ OpenXM/src/k097/lib/ox/ox.k	2016/04/01 22:45:56	1.14
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/k097/lib/ox/ox.k,v 1.10 2001/01/13 12:40:57 takayama Exp $  */
+/* $OpenXM: OpenXM/src/k097/lib/ox/ox.k,v 1.13 2008/01/28 00:13:45 takayama Exp $  */
 
 /* Load_sm1(["ox.sm1",AddString([GetEnv("OpenXM_HOME"),"/lib/sm1/ox.sm1"])],
          "ox.sm1.loaded"); */
@@ -6,6 +6,12 @@ Load_sm1(["oxasir.sm1",AddString([GetEnv("OpenXM_HOME"
           "/lib/sm1/oxasir.sm1"])],
          "oxasir.sm1.loaded");
 
+def oxGetClientList() {
+  local clist;
+  sm1(" [(oxGetClientList)] extension /clist set ");
+  return( clist );
+}
+
 class OXchannel extends Object {
   local channel;
   /* Just add a tag. */
@@ -92,7 +98,7 @@ class OXcontrol extends Object {
        "/bin/oxc", 
        " -c ", pass, " -h "," localhost ", " -p ", data, xopt,
        " & "]);
-    sm1(" [ (/bin/csh -c \") s (\") ] cat /stmp set ");
+    sm1(" [ (/bin/sh -c \") s (\") ] cat /stmp set ");
     sm1(" stmp message ");
     sm1(" stmp system  ");
     sm1(" [(oxCreateControl_RFC_101) peer 0 pass] extension /c set ");
@@ -219,7 +225,6 @@ class OX extends OXcontrol {
      this.pushCMO(s);
      this.pushCMD(SM_executeStringByLocalParser);
   }
-
 }
 
 /*
@@ -257,8 +262,7 @@ class Asir extends OX {
   def OffTimer() {
     local a;
     a = this;
-    a.executeString("map(rtostr,[time()[0]-K0_timer_CPU,
-                                 time()[1]-K0_timer_GC]);");
+    a.executeString("map(rtostr,[time()[0]-K0_timer_CPU,time()[1]-K0_timer_GC]);");
     return(a.popCMO());
   }
 }