===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/lib/xm,v
retrieving revision 1.18
retrieving revision 1.20
diff -u -p -r1.18 -r1.20
--- OpenXM_contrib2/asir2000/lib/xm	2002/08/10 11:12:32	1.18
+++ OpenXM_contrib2/asir2000/lib/xm	2003/05/21 23:31:54	1.20
@@ -45,7 +45,7 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/lib/xm,v 1.17 2002/08/04 07:16:54 takayama Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/lib/xm,v 1.19 2003/05/18 00:13:14 takayama Exp $ 
 */
 /**  xm  **/
 Xm_noX = 0$  
@@ -217,6 +217,12 @@ def first(A) {return(A[0]);}
 
 
 def ox_grep(A) {
+  if (type(A) == 2) {
+    A = rtostr(A);
+  }else if (type(A) != 7) {
+    return("Usage: ox_grep(keyword)");
+  }
+
   if (ox_getenv("LANG") == "ja_JP.EUC") {
     F = get_rootdir()+"/help-jp/";
   }else{
@@ -243,6 +249,9 @@ load("sm1")$
 load("gnuplot")$
 load("tigers")$
 load("phc")$
-load("longname")$
+
+/* This module is obsolete and will no be supported.
+   See OpenXM/src/asir-contrib/packages/src/oxrfc100.rr
+*/
 
 end$