summaryrefslogtreecommitdiff
path: root/ext/tk/sample/demos-en/bind.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk/sample/demos-en/bind.rb')
-rw-r--r--ext/tk/sample/demos-en/bind.rb18
1 files changed, 6 insertions, 12 deletions
diff --git a/ext/tk/sample/demos-en/bind.rb b/ext/tk/sample/demos-en/bind.rb
index aabe7f0849..b7e7122c57 100644
--- a/ext/tk/sample/demos-en/bind.rb
+++ b/ext/tk/sample/demos-en/bind.rb
@@ -94,33 +94,27 @@ TkText.new($bind_demo){|t|
}
d1.bind('1',
proc{
- eval(`cat #{[$demo_dir,'items.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'items.rb'].join(File::Separator)}`)
})
d2.bind('1',
proc{
- eval(`cat #{[$demo_dir,'plot.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'plot.rb'].join(File::Separator)}`)
})
d3.bind('1',
proc{
- eval(`cat #{[$demo_dir,'ctext.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'ctext.rb'].join(File::Separator)}`)
})
d4.bind('1',
proc{
- eval(`cat #{[$demo_dir,'arrow.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'arrow.rb'].join(File::Separator)}`)
})
d5.bind('1',
proc{
- eval(`cat #{[$demo_dir,'ruler.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'ruler.rb'].join(File::Separator)}`)
})
d6.bind('1',
proc{
- eval(`cat #{[$demo_dir,'cscroll.rb'].join(File::Separator)}`,
- _null_binding)
+ eval_samplecode(`cat #{[$demo_dir,'cscroll.rb'].join(File::Separator)}`)
})
TkTextMarkInsert.new(t, '0.0')