jw@sics.se (Johan Widen) (03/06/88)
*** script.c.old Tue Mar 01 14:00:20 1988 --- script.c Sat Mar 05 19:17:26 1988 *************** *** 866,876 **** void cmd_xproto(par) char *par; { ! int i, l = strlen(par); ! char temp[40]; /* downcase the parameter */ ! for(i=0; i<l; i++) par[i] |= ' '; p_xproto = MODEMAX + 1; /* Establish a default */ --- 866,881 ---- void cmd_xproto(par) char *par; { ! int i; ! char temp[40], *p; + if(!(par = strtok(par," \t\n"))) { + puts("XPROTO no parameter\n"); + if(doing_init == 0) redofile(); + return; + } /* downcase the parameter */ ! for(p = par; *p; *p++ |= ' '); p_xproto = MODEMAX + 1; /* Establish a default */ *************** *** 963,968 **** --- 968,977 ---- /* myfontname has been initialized from p_font in InitDefaults() in ** init.c */ + if(!(par = strtok(par," \t\n"))) { + puts("FONT no parameter\n"); + return; + } if(*par) { if(strlen(par) < MAXFONTVARLEN) { strcpy(myfontname, par); -- Johan Widen SICS, PO Box 1263, S-164 28 KISTA, SWEDEN Tel: +46 8 752 15 32 Ttx: 812 61 54 SICS S Fax: +46 8 751 72 30 Internet: jw@sics.se or {mcvax,munnari,ukc,unido}!enea!sics.se!jw