diff options
| author | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2000-06-12 07:48:31 +0000 |
|---|---|---|
| committer | matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2000-06-12 07:48:31 +0000 |
| commit | 2bc48ec00f2ee0028c1a5096aa676391820b87ec (patch) | |
| tree | f89e9e7746e75343a2886ee50fc23a37f9fe5886 /ext/tk/lib/tkentry.rb | |
| parent | ce6c53d24d361f589169ffa49360e93be8c994a3 (diff) | |
| download | ruby-2bc48ec00f2ee0028c1a5096aa676391820b87ec.tar.gz ruby-2bc48ec00f2ee0028c1a5096aa676391820b87ec.tar.xz ruby-2bc48ec00f2ee0028c1a5096aa676391820b87ec.zip | |
2000-06-12
git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@741 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/tk/lib/tkentry.rb')
| -rw-r--r-- | ext/tk/lib/tkentry.rb | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/ext/tk/lib/tkentry.rb b/ext/tk/lib/tkentry.rb index f35d2eef0..5207d9b89 100644 --- a/ext/tk/lib/tkentry.rb +++ b/ext/tk/lib/tkentry.rb @@ -59,6 +59,14 @@ class TkEntry<TkLabel tk_send 'selection', 'to', index end + def validate + if tk_send('validate') == '0' + false + else + true + end + end + def value tk_send 'get' end |