- /*
- ** Get new format string. Must be before chdir().
- */
- nfs = new_fs(form, format, FORMAT);
- ncomps = fmt_compile(nfs, &fmt);
+ /* Set format string. Must be before chdir(). */
+ fmtstr = new_fs(form, scanformat);
+ fmt_compile(fmtstr, &fmt);