From 7c413d2e3a005baaf3275b2808ee26a46aff6f4b Mon Sep 17 00:00:00 2001 From: nagai Date: Mon, 16 Jun 2008 18:50:53 +0000 Subject: * ext/tk/sample/demos-jp/toolber.rb, ext/tk/sample/demos-en/toolber.rb: fail to back a tear-off marker when reattach the toolbar. git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@17369 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ext/tk/sample/demos-en/toolbar.rb | 2 +- ext/tk/sample/demos-jp/toolbar.rb | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/ext/tk/sample/demos-en/toolbar.rb b/ext/tk/sample/demos-en/toolbar.rb index 5cf863717..633c52c15 100644 --- a/ext/tk/sample/demos-en/toolbar.rb +++ b/ext/tk/sample/demos-en/toolbar.rb @@ -70,7 +70,7 @@ if Tk.windowingsystem != 'aqua' w.grid_remove self.wm_manage # self.wm_title('Toolbar') # if you don't want to use its widget name as a window title. - self.wm_protocol('WM_DELETE_WINDOW'){ self.untearoff(self) } + self.wm_protocol('WM_DELETE_WINDOW'){ self.untearoff(w) } end def tbar_base.untearoff(w) self.wm_forget diff --git a/ext/tk/sample/demos-jp/toolbar.rb b/ext/tk/sample/demos-jp/toolbar.rb index 9cb3834c3..1bb265d1f 100644 --- a/ext/tk/sample/demos-jp/toolbar.rb +++ b/ext/tk/sample/demos-jp/toolbar.rb @@ -73,7 +73,7 @@ if Tk.windowingsystem != 'aqua' w.grid_remove self.wm_manage # self.wm_title('Toolbar') # もしウィジェット名をウィンドウタイトルにしたくないなら，ここで設定してください - self.wm_protocol('WM_DELETE_WINDOW'){ self.untearoff(self) } + self.wm_protocol('WM_DELETE_WINDOW'){ self.untearoff(w) } end def tbar_base.untearoff(w) self.wm_forget -- cgit