Stop "fortune -l" from looping forever.
PR: bin/58730 Submitted by: pak <pak@cns.utoronto.ca>
This commit is contained in:
parent
7cc51bb81d
commit
17cbb0b2fc
@ -282,7 +282,7 @@ fortlen()
|
|||||||
char line[BUFSIZ];
|
char line[BUFSIZ];
|
||||||
|
|
||||||
if (!(Fortfile->tbl.str_flags & (STR_RANDOM | STR_ORDERED)))
|
if (!(Fortfile->tbl.str_flags & (STR_RANDOM | STR_ORDERED)))
|
||||||
nchar = (Seekpts[1] - Seekpts[0] <= SLEN);
|
nchar = (int)(Seekpts[1] - Seekpts[0]);
|
||||||
else {
|
else {
|
||||||
open_fp(Fortfile);
|
open_fp(Fortfile);
|
||||||
(void) fseek(Fortfile->inf, Seekpts[0], 0);
|
(void) fseek(Fortfile->inf, Seekpts[0], 0);
|
||||||
|
Loading…
Reference in New Issue
Block a user