summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sanctuary.fs4
1 files changed, 3 insertions, 1 deletions
diff --git a/sanctuary.fs b/sanctuary.fs
index 44153d0..43e632c 100644
--- a/sanctuary.fs
+++ b/sanctuary.fs
@@ -328,7 +328,9 @@ privatise
cline /line-buffer accept
dup cline-used !
dup #tib !
- 0<> if true else false then ;
+ 0<> if true else
+ cbuffer-used @ 0= if false else true then
+ then ;
\ todo reset RSP
: quit 0 to source-id postpone [