Adapted to search for description files in either

~em/lib/descr/<file> or ~em/lib/<file>/descr
This commit is contained in:
ceriel 1987-02-13 13:39:30 +00:00
parent 04d031d33d
commit 90cae7c6a5

View file

@ -68,8 +68,15 @@ stop(filled) {
}
FILE *do_open(file) char *file ; {
FILE *fd;
strcpy(tail,file) ;
return fopen(dname,"r") ;
strcat(tail,"/");
strcat(tail,"descr");
if ((fd = fopen(dname,"r")) != NULL) return fd;
strcpy(tail,"descr/");
strcat(tail,file);
return fopen(dname,"r");
}
readm() {