Subversion Repositories SvarDOS

Rev

Rev 372 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 372 Rev 378
Line 20... Line 20...
20 
        if (buff[i] == 0) break;
 20 
        if (buff[i] == 0) break;
21 
      }
 21 
      }
22 
      outputnl(buff);
 22 
      outputnl(buff);
23 
    }
 23 
    }
24 
  } else if ((p->argc == 1) && (imatch(p->argv[0], "/?"))) {
 24 
  } else if ((p->argc == 1) && (imatch(p->argv[0], "/?"))) {
- 
 
 25 
    outputnl("Displays, sets, or removes DOS environment variables");
- 
 
 26 
    outputnl("");
25 
    outputnl("TODO: help screen"); /* TODO */
 27 
    outputnl("SET [variable=[string]]");
- 
 
 28 
    outputnl("");
- 
 
 29 
    outputnl("variable  Specifies the environment-variable name");
- 
 
 30 
    outputnl("string    Specifies a series of characters to assign to the variable");
- 
 
 31 
    outputnl("");
- 
 
 32 
    outputnl("Type SET without parameters to display the current environment variables.");
26 
  } else { /* set variable (do not rely on argv, SET has its own rules...) */
 33 
  } else { /* set variable (do not rely on argv, SET has its own rules...) */
27 
    const char far *ptr;
 34 
    const char far *ptr;
28 
    unsigned short i;
 35 
    unsigned short i;
29 
    /* locate the first space */
 36 
    /* locate the first space */
30 
    for (ptr = p->cmdline; *ptr != ' '; ptr++);
 37 
    for (ptr = p->cmdline; *ptr != ' '; ptr++);