diff options
| author | s-ol <s+removethis@s-ol.nu> | 2024-05-20 16:19:23 +0000 |
|---|---|---|
| committer | s-ol <s+removethis@s-ol.nu> | 2024-05-20 16:19:23 +0000 |
| commit | 2e1c88c151e45f288c02f09e413c174574d3f210 (patch) | |
| tree | 6137ac347690d6db68d0160f443a2946666a1d3d /virtual-programs/terminal.folk | |
| parent | wip: Statement-based printer configuration (diff) | |
| download | folk-sol.tar.gz folk-sol.zip | |
fu: keyboardsol
Diffstat (limited to 'virtual-programs/terminal.folk')
| -rw-r--r-- | virtual-programs/terminal.folk | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/virtual-programs/terminal.folk b/virtual-programs/terminal.folk index e5de23dd..a604fbd7 100644 --- a/virtual-programs/terminal.folk +++ b/virtual-programs/terminal.folk @@ -77,10 +77,9 @@ When /anyone/ wishes /thing/ is a terminal spawning /cmd/ { } When /anyone/ claims $thing has keyboard input \ - & keyboard /anyone/ claims key /key/ is /direction/ with modifiers /modifiers/ timestamp /timestamp/ { + & keyboard /anyone/ claims key /key/ is /direction/ timestamp /timestamp/ { if {$direction != "up"} { - set ctrlPressed [expr {"ctrl" in $modifiers}] - Terminal::write $term $key $ctrlPressed + Terminal::write $term $key } } } |