hydrovax@nmtsun.nmt.edu (M. Warner Losh) (12/15/87)
Here is the diffs between my more and the more that was posted here
a couple (3???) of days ago. That more was an update on a previous
posting. This is in SUMSLP format. To use it do the following:
$ rename more.c more_org.c
$ edit/sum more_org.c/output=more.c/update=diff.upd
and recompile more.
----------------8<---------------8<-----------------------
- 21
Modified by M. Warner Losh
System Manager HydroVAX
New Mexico Tech, Socorro NM.
...!lanl!unm-la!unmvax!warner%hydrovax
December 1987
Fixed both t and b commands so that when they are at the top of the
file, they don't do anything
Fixed the spawn command so that it only spawns one job, instead of
spawning a spawn.
If no files are found, then it says not files were found.
- 74
bool file_found;
- 91, 91
file_found = FALSE;
while (lib$find_file(&name_desc, &result, &context) & 1) {
file_found = TRUE;
- 99
if (!file_found)
fprintf (stderr, "Couldn't find file %s\n", argv[i]);
- 141, 141
printf("\r--More--(%s, %d%%)", fname,
- 211, 218
if (wc != 0)
{
wc = 0;
fseek(fp, win[wc], 0);
if (!prwindow(fp, Screen_Height - 1, last_file))
return;
}
break;
case 'b':
if (wc > 0)
{
wc--;
fseek(fp, win[wc], 0);
if (!prwindow(fp, Screen_Height - 1, last_file))
return;
}
- 324, 327
printf("\nSpawning subprocess ... use EOJ to return.\n");
lib$spawn();
/
-------------------------------8<-----------------8<------------
Place the above file in more.upd and the commands given above should
work. Please note, that they will only work on the second more/less
posted. If you have made changes to it, then it will be difficult for
you to use this. Sorry. If there is a better way, could somebody
e-mail it to me???
--
bitnet: lush@nmt.csnet M. Warner Losh
csnet: warner%hydrovax@nmtsun
uucp: ...{cmcl2, ihnp4}!lanl!unmvax!nmtsun!warner%hydrovax
...{cmcl2, ihnp4}!lanl!unmvax!nmtsun!hydrovax
Warning: Hydrovax is both a machine, and an account, so be careful.