Delay the cursor blink

Doug Coleman 2010-05-23 22:26:46 -05:00
parent 616ad9a4a7
commit fc9a5fee58
1 changed files with 1 additions and 1 deletions

View File

@ -65,7 +65,7 @@ SYMBOL: blink-interval
: start-blinking ( editor -- )
[ stop-blinking ] [
t >>blink
dup '[ _ blink-caret ] blink-interval get every
dup '[ _ blink-caret ] blink-interval get delayed-every
>>blink-alarm drop
] bi ;