X-Git-Url: http://git.subgeniuskitty.com/pforth/.git/blobdiff_plain/bb6b2dcdd9acffabfd373c4c3f6b64a9cc43f335..6b91cb54fc7dec367c57b4d9e97f2a086b809ea6:/fth/history.fth diff --git a/fth/history.fth b/fth/history.fth index dfb7baa..5e5409e 100644 --- a/fth/history.fth +++ b/fth/history.fth @@ -421,9 +421,9 @@ variable KH-INSIDE ( true if we are scrolling inside the history buffer ) kh.inschar REPEAT drop kh-span @ kh-cursor @ - ?dup - IF 1+ tio.forwards ( move to end of line ) - ELSE space + IF tio.forwards ( move to end of line ) THEN + space flushemit ;