This is the mail archive of the
xconq7@sources.redhat.com
mailing list for the Xconq project.
the game over dialog
- From: MA Dunzi <tadalunch at s5 dot xrea dot com>
- To: xconq7 at sources dot redhat dot com
- Date: Wed, 19 Jun 2002 03:46:54 +0900 (JST)
- Subject: the game over dialog
| tcltk/tkconq.tcl rev 1.102
| # This is overkill, but it seems to be the only way to force these two lines to justify.
I created '.gameover.hint' as 'label' and it seems to work in unix.
--- tkconq.tcl.orig Wed Jun 19 03:45:16 2002
+++ tkconq.tcl Wed Jun 19 02:20:11 2002
@@ -3995,16 +3995,8 @@
-command { exit_xconq }
pack .gameover.quitnow -side top -padx 4 -pady 4
- text .gameover.hint -width 36 -height 2 -borderwidth 0 -font $textfont
+ label .gameover.hint -width 36 -font $textfont -text "If you continue, you can look around\n and see how the game ended."
pack .gameover.hint -side top -padx 4 -pady 4
-
- .gameover.hint insert end "If you continue, you can look around\n and see how the game ended."
- .gameover.hint configure -state disabled
- # This is overkill, but it seems to be the only way to force these two lines to justify.
- .gameover.hint tag add line1 1.0
- .gameover.hint tag add line2 2.0
- .gameover.hint tag configure line1 -justify center
- .gameover.hint tag configure line2 -justify center
button .gameover.continue -text "Continue" \
-command { dismiss_game_over_dialog }
--
MA Dunzi <tadalunch@s5.xrea.com> http://tadalunch.s5.xrea.com/xconq/index.html