summaryrefslogtreecommitdiffstats
path: root/virtual-programs
diff options
context:
space:
mode:
authorAndrés Cuervo <andrescuervor@gmail.com>2023-12-11 21:12:59 +0000
committerAndrés Cuervo <andrescuervor@gmail.com>2023-12-11 21:12:59 +0000
commita1b69f30b1b27b63f2873af5dd2b5d3019e2b799 (patch)
treed47533420b256bee8e9fbf2edde521d91839f763 /virtual-programs
parentMake keyboard editors unique (diff)
downloadfolk-a1b69f30b1b27b63f2873af5dd2b5d3019e2b799.tar.gz
folk-a1b69f30b1b27b63f2873af5dd2b5d3019e2b799.zip
Fix baseCode overwriting
Diffstat (limited to 'virtual-programs')
-rw-r--r--virtual-programs/editor.folk6
1 files changed, 5 insertions, 1 deletions
diff --git a/virtual-programs/editor.folk b/virtual-programs/editor.folk
index 41629c6c..47e19c56 100644
--- a/virtual-programs/editor.folk
+++ b/virtual-programs/editor.folk
@@ -6,7 +6,11 @@ When /page/ is a keyboard with path /kbPath/ & /page/ has region /r/ {
set id "$page$kbPath"
Wish $page is outlined gray
Claim $id has region [region move $r up 450px]
- Commit "code$kbPath" { Claim $id has program code $baseCode }
+ When /nobody/ claims $id has program code /c/ {
+ Commit "code$kbPath" {
+ Claim $id has program code $baseCode
+ }
+ }
}
proc updateCursor {oldCursor updates} {