summaryrefslogtreecommitdiffstats
path: root/virtual-programs
diff options
context:
space:
mode:
authorAndrés Cuervo <acwervo@gmail.com>2022-12-18 20:00:10 +0000
committerAndrés Cuervo <acwervo@gmail.com>2022-12-18 20:00:10 +0000
commita264fc7e178493e3d4b47a6ea094934aebee36e2 (patch)
tree1c20582994105ebc920a2c56a710a8994fe79d7e /virtual-programs
parentSupport `when when` (diff)
downloadfolk-a264fc7e178493e3d4b47a6ea094934aebee36e2.tar.gz
folk-a264fc7e178493e3d4b47a6ea094934aebee36e2.zip
Add camera-slice
Diffstat (limited to 'virtual-programs')
-rw-r--r--virtual-programs/camera-slice.folk9
1 files changed, 9 insertions, 0 deletions
diff --git a/virtual-programs/camera-slice.folk b/virtual-programs/camera-slice.folk
new file mode 100644
index 00000000..857ac0ec
--- /dev/null
+++ b/virtual-programs/camera-slice.folk
@@ -0,0 +1,9 @@
+Wish $this has filename "camera-slice.folk"
+Wish $this has camera image
+When $this has camera image /im/ {
+ When $this has region /r/ {
+ Wish display runs [list Display::image {*}[lindex $r 0 0] $im]
+ }
+}
+
+Wish $this is outlined white