summaryrefslogtreecommitdiff
path: root/ruby_1_9_3/ext/tk/sample/propagate.rb
diff options
context:
space:
mode:
Diffstat (limited to 'ruby_1_9_3/ext/tk/sample/propagate.rb')
-rw-r--r--ruby_1_9_3/ext/tk/sample/propagate.rb30
1 files changed, 0 insertions, 30 deletions
diff --git a/ruby_1_9_3/ext/tk/sample/propagate.rb b/ruby_1_9_3/ext/tk/sample/propagate.rb
deleted file mode 100644
index 66f14aeb72..0000000000
--- a/ruby_1_9_3/ext/tk/sample/propagate.rb
+++ /dev/null
@@ -1,30 +0,0 @@
-#!/usr/bin/env ruby
-require 'tk'
-
-TkLabel.new(:text=>"Please click the bottom frame").pack
-
-f = TkFrame.new(:width=>400, :height=>100, :background=>'yellow',
- :relief=>'ridge', :borderwidth=>5).pack
-
-# TkPack.propagate(f, false) # <== important!!
-f.pack_propagate(false) # <== important!!
-
-list = (1..3).collect{|n|
- TkButton.new(f, :text=>"button#{'-X'*n}"){
- command proc{
- puts "button#{'-X'*n}"
- self.unpack
- }
- }
-}
-
-list.unshift(nil)
-
-f.bind('1', proc{
- w = list.shift
- w.unpack if w
- list.push(w)
- list[0].pack(:expand=>true, :anchor=>:center) if list[0]
- })
-
-Tk.mainloop