diff options
author | dteske <dteske@FreeBSD.org> | 2015-04-02 01:46:17 +0000 |
---|---|---|
committer | dteske <dteske@FreeBSD.org> | 2015-04-02 01:46:17 +0000 |
commit | d64a11d9ba55447d3deed5ec4e589a139b6a7c87 (patch) | |
tree | 73a4f27532a6c570aad47339ddda46c0280069c4 /sys/boot/forth | |
parent | 868c1ec5c2d46ff1b6ac00954f63e03e0ca85d64 (diff) | |
download | FreeBSD-src-d64a11d9ba55447d3deed5ec4e589a139b6a7c87.zip FreeBSD-src-d64a11d9ba55447d3deed5ec4e589a139b6a7c87.tar.gz |
Use fg/b/me from screen.4th instead of literals
MFC after: 3 days
X-MFC-to: stable/10
Diffstat (limited to 'sys/boot/forth')
-rw-r--r-- | sys/boot/forth/menu.4th | 9 | ||||
-rw-r--r-- | sys/boot/forth/version.4th | 9 |
2 files changed, 7 insertions, 11 deletions
diff --git a/sys/boot/forth/menu.4th b/sys/boot/forth/menu.4th index 892e807..4eab6ab 100644 --- a/sys/boot/forth/menu.4th +++ b/sys/boot/forth/menu.4th @@ -216,13 +216,10 @@ also menu-infrastructure definitions dup menuX @ swap at-xy \ Print the value of menuidx - loader_color? if - ." [1m" ( [22m ) - then + loader_color? dup ( -- bool bool ) + if b then menuidx @ . - loader_color? if - ." [37m" ( [39m ) - then + if me then \ Move the cursor forward 1 column dup menuX @ 1+ swap at-xy diff --git a/sys/boot/forth/version.4th b/sys/boot/forth/version.4th index aec2562..2b672b6 100644 --- a/sys/boot/forth/version.4th +++ b/sys/boot/forth/version.4th @@ -85,11 +85,10 @@ only forth definitions also version-processing dup versionX @ swap - versionY @ at-xy \ Print the version (optionally in cyan) - loader_color? if - ." [36m" type ." [37m" - else - type - then + loader_color? dup ( -- bool bool ) + if 6 fg then + type + if me then ; only forth definitions |