summaryrefslogtreecommitdiff
path: root/ext/tk
diff options
context:
space:
mode:
Diffstat (limited to 'ext/tk')
-rw-r--r--ext/tk/lib/tk/texttag.rb2
-rw-r--r--ext/tk/sample/tcltklib/sample2.rb14
-rw-r--r--ext/tk/sample/tkline.rb4
-rw-r--r--ext/tk/sample/tktimer.rb6
4 files changed, 13 insertions, 13 deletions
diff --git a/ext/tk/lib/tk/texttag.rb b/ext/tk/lib/tk/texttag.rb
index 9f11c6539b..a909596b35 100644
--- a/ext/tk/lib/tk/texttag.rb
+++ b/ext/tk/lib/tk/texttag.rb
@@ -175,7 +175,7 @@ class TkTextTag<TkObject
# end
# end
# def configure(key, value)
-# if value == FALSE
+# if value == false
# value = "0"
# elsif value.kind_of?(Proc)
# value = install_cmd(value)
diff --git a/ext/tk/sample/tcltklib/sample2.rb b/ext/tk/sample/tcltklib/sample2.rb
index 378c2d3eb7..eab7086ee4 100644
--- a/ext/tk/sample/tcltklib/sample2.rb
+++ b/ext/tk/sample/tcltklib/sample2.rb
@@ -381,7 +381,7 @@ class Othello
$wm.e("iconname", $root, "Othello")
@board.com_disk = WHITE
- @game_over = FALSE
+ @game_over = false
TclTk.mainloop
end
@@ -403,11 +403,11 @@ class Othello
@board_view.clear
@board.reset
$wm.e("title", $root, "Othello")
- @game_over = FALSE
+ @game_over = false
end
def com_turn
- @in_com_turn = TRUE
+ @in_com_turn = true
$update.e()
sleep(0.5)
begin
@@ -421,22 +421,22 @@ class Othello
else
$wm.e("title", $root, "{Othello - You Loose!}")
end
- @game_over = TRUE
+ @game_over = true
break
elsif com_disk == 0
$wm.e("title", $root, "{Othello - You Win!}")
- @game_over = TRUE
+ @game_over = true
break
elsif man_disk == 0
$wm.e("title", $root, "{Othello - You Loose!}")
- @game_over = TRUE
+ @game_over = true
break
end
row, col = @board.search(@board.com_disk)
break if row == nil || col == nil
@board.put_disk(row, col, @board.com_disk)
end while @board.search(@board.man_disk) == [nil, nil]
- @in_com_turn = FALSE
+ @in_com_turn = false
end
def show_point
diff --git a/ext/tk/sample/tkline.rb b/ext/tk/sample/tkline.rb
index c23cb95cbd..f823319f76 100644
--- a/ext/tk/sample/tkline.rb
+++ b/ext/tk/sample/tkline.rb
@@ -2,10 +2,10 @@
require "tkclass"
-$tkline_init = FALSE
+$tkline_init = false
def start_random
return if $tkline_init
- $tkline_init = TRUE
+ $tkline_init = true
if defined? Thread
Thread.start do
loop do
diff --git a/ext/tk/sample/tktimer.rb b/ext/tk/sample/tktimer.rb
index 4b6abae7e6..b68d309254 100644
--- a/ext/tk/sample/tktimer.rb
+++ b/ext/tk/sample/tktimer.rb
@@ -14,7 +14,7 @@ TkButton.new {
text 'Start'
command proc {
if $stopped
- $stopped = FALSE
+ $stopped = false
tick
end
}
@@ -24,14 +24,14 @@ TkButton.new {
text 'Stop'
command proc{
exit if $stopped
- $stopped = TRUE
+ $stopped = true
}
pack('side'=>'right','fill'=>'both','expand'=>'yes')
}
$seconds=0
$hundredths=0
-$stopped=TRUE
+$stopped=true
def tick
if $stopped then return end