From 24d2225afde5beb0771c8987c2e1c80ce900b52a Mon Sep 17 00:00:00 2001
From: nagai <nagai@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 9 Jul 2004 19:29:29 +0000
Subject: * ext/tk/lib/tk.rb: better operation for SIGINT when processing
 callbacks. * ext/tk/lib/tk/msgcat.rb: ditto. * ext/tk/lib/tk/variable.rb:
 ditto. * ext/tk/lib/tk/timer.rb: ditto. * ext/tk/lib/tk/validation.rb: add
 Tk::ValidateConfigure.__def_validcmd()   to define validatecommand methods
 easier

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@6608 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tk/msgcat.rb | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'ext/tk/lib/tk/msgcat.rb')

diff --git a/ext/tk/lib/tk/msgcat.rb b/ext/tk/lib/tk/msgcat.rb
index 6c46542faf..361b9a5de3 100644
--- a/ext/tk/lib/tk/msgcat.rb
+++ b/ext/tk/lib/tk/msgcat.rb
@@ -57,6 +57,10 @@ class TkMsgCatalog < TkObject
     return src_str unless cmd       # no cmd -> return src-str (default action)
     begin
       cmd.call(locale, src_str)
+    rescue SystemExit
+      exit(0)
+    rescue Interrupt
+      exit!(1)
     rescue Exception => e
       begin
 	msg = _toUTF8(e.class.inspect) + ': ' + 
-- 
cgit v1.2.3