summaryrefslogtreecommitdiff
path: root/cmd/il.ha
diff options
context:
space:
mode:
Diffstat (limited to 'cmd/il.ha')
-rw-r--r--cmd/il.ha16
1 files changed, 16 insertions, 0 deletions
diff --git a/cmd/il.ha b/cmd/il.ha
index afc1ee5..b6d1efb 100644
--- a/cmd/il.ha
+++ b/cmd/il.ha
@@ -61,6 +61,22 @@ export fn main() void = {
if (r == 'K') {
list::frameup(&li);
};
+ if (r == 'd') {
+ const nextpage = li.cursor + li.frame.end - li.frame.start;
+ fmt::errorln(nextpage)!;
+ list::setcursor(&li, nextpage);
+ fmt::errorln(li.frame.start)!;
+ fmt::errorln(li.frame.end)!;
+ fmt::errorln()!;
+ };
+ if (r == 'u') {
+ const prevpage = li.cursor - (li.frame.end - li.frame.start);
+ fmt::errorln(prevpage)!;
+ list::setcursor(&li, prevpage);
+ fmt::errorln(li.frame.start)!;
+ fmt::errorln(li.frame.end)!;
+ fmt::errorln()!;
+ };
if (r == 'g') {
list::top(&li);
};