From e14f4ff4ab9a2af85a1a0e31e03445fc6c5c0c84 Mon Sep 17 00:00:00 2001
From: "(no author)" <(no author)@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Tue, 10 Apr 2001 06:09:00 +0000
Subject: This commit was manufactured by cvs2svn to create tag
 'v1_6_4_preview1'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/tags/v1_6_4_preview1@1317 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 ext/tk/lib/tkentry.rb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/ext/tk/lib/tkentry.rb b/ext/tk/lib/tkentry.rb
index 6b25be376b..7af3f26748 100644
--- a/ext/tk/lib/tkentry.rb
+++ b/ext/tk/lib/tkentry.rb
@@ -136,7 +136,7 @@ class TkEntry<TkLabel
     tk_send 'selection', 'from', index
   end
   def selection_present()
-    tk_send('selection', 'present') == 1
+    bool(tk_send('selection', 'present'))
   end
   def selection_range(s, e)
     tk_send 'selection', 'range', s, e
-- 
cgit v1.2.3