===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/shell.c,v
retrieving revision 1.15
retrieving revision 1.17
diff -u -p -r1.15 -r1.17
--- OpenXM/src/kan96xx/Kan/shell.c	2012/10/29 02:51:41	1.15
+++ OpenXM/src/kan96xx/Kan/shell.c	2020/10/06 11:33:47	1.17
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/shell.c,v 1.14 2005/07/03 11:08:54 ohara Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/shell.c,v 1.16 2013/09/20 06:02:19 takayama Exp $ */
 #include <stdio.h>
 #include <string.h>
 #include <sys/types.h>
@@ -64,7 +64,7 @@ void KoxShellHelp(char *key,FILE *fp) {
     for (i=0; strcmp(keys[i],"@@@@gatekeeper") != 0; i++) {
       fprintf(fp,"%s\n",keys[i]);
       KoxShellHelp(keys[i],fp);
-      fprintf(fp,"\n",keys[i]);
+      fprintf(fp,"%s\n",keys[i]);
     }
     return;
   }
@@ -84,7 +84,9 @@ void KoxShellHelp(char *key,FILE *fp) {
     s[1] = "cmdname arg1 arg2 ... ";
     s[2] = "Example 1: /afo (Hello! ) def [(cat) (stringIn://afo)] oxshell";
     s[3] = "Example 2: [(polymake) (stringInOut://afo.poly) (FACETS)] oxshell";
-    s[4] = NULL;
+    s[4] = "A temporary file afo.poly* with the contents of the variable afo.poly is generated under $TMP and \"polymake $TMP FACETS\" will be executed. cf. kan96xx/trans/doPolymake.sm1, Doc/oxshell.oxw, Doc/changelog-ja.tex";
+    s[5] = "Example 3: [(ls) (-l) (>) (stringOut://ff)] oxshell";
+    s[6] = NULL;
   }else if (strcmp(key,"redirect")==0) {
     s[0] = "The following redirect operators are implemented.";
     s[1] = "< > 2>";
@@ -197,7 +199,7 @@ static int mysetenv(char *name, char *value, int overw
 
 /* bug on Solaris. It does not unsetenv.
    libc4, libc5, glibc. It does unsetenv. */
-static myunsetenv(char *name) {
+static int myunsetenv(char *name) {
   return(putenv(name));
 }