commit 62f663bb4928e430e95b54f7b4f93e3dca991ccf
from: Omar Polo <op@omarpolo.com>
date: Sun Jan 16 14:11:11 2022 UTC

use $PAGER instead of hardcoding `less' (which is still the default)

commit - aa76fd7feb09deb66f083c71fe801b06896dabbd
commit + 62f663bb4928e430e95b54f7b4f93e3dca991ccf
blob - 51aa62d3f237693b68cc4e49660ff9eb1308b549
blob + cea9998e3ff24392713e9c0e4d3e9db3efe372fe
--- kamiftp/ftp.c
+++ kamiftp/ftp.c
@@ -1204,11 +1204,15 @@ cmd_page(int argc, const char **argv)
 	struct qid qid;
 	int nfid, tmpfd, miss;
 	char sfn[TMPFSTRLEN], p[PATH_MAX], *name, *errstr;
+	const char *pager;
 
 	if (argc != 1) {
 		puts("usage: page file");
 		return;
 	}
+
+	if ((pager = getenv("PAGER")) == NULL)
+		pager = "less";
 
 	nfid = pwdfid+1;
 	errstr = walk_path(pwdfid, nfid, *argv, &miss, &qid);
@@ -1234,7 +1238,7 @@ cmd_page(int argc, const char **argv)
 	name = basename(p);
 	fetch_fid(nfid, tmpfd, name);
 	close(tmpfd);
-	spawn("less", sfn, NULL);
+	spawn(pager, sfn, NULL);
 	unlink(sfn);
 }