* ------------[ BLED merge (c) Ken Goosens ]------------- * Merge this against D:\172B\CONFIG.BAS to produce CONFIG.BAS * D:\172B\CONFIG.BAS: Date 2-10-1990 Size 153303 bytes * ------------[ Created 05-20-1990 20:29:16 ]------------ * REPLACING old line(s) by new * ------[ first line different ]------ 17280 CALL ASKRO("Name of file shown for security breaches (prefix ONLY)",24,HJ$) ' KG030301 IF LEN(HJ$) > 8 OR INSTR(HJ$,".") > 0 THEN _ GOTO 17280 IF LEN(HJ$) < 1 THEN _ SECVIO.HLP$ = NONE.PICKED$ : _ RETURN CALL ALLCAPS (HJ$) SECVIO.HLP$ = HELP.PATH$ + HJ$ + "." + HELP.EXTENSION$ RETURN