Merge 9.0core-tip-626

1 files changed, 11 insertions, 11 deletions

diff --git a/tests/visual_bb.test b/tests/visual_bb.test
index c2bed6f..e118838 100644
--- a/tests/visual_bb.test
+++ b/tests/visual_bb.test
@@ -51,7 +51,7 @@ test 1.1 {running visual tests} -constraints userInteraction -body {
 
     frame .menu -relief raised -borderwidth 1
     message .msg -font {Times 18} -relief raised -width 4i \
-        -borderwidth 1 -text "This application provides a collection of visual tests for the Tk toolkit.  Each menu entry invokes a test, which displays information on the screen.  You can then verify visually that the information is being displayed in the correct way.  The tests under the \"Postscript\" menu exercise the Postscript-generation capabilities of canvas widgets."
+	-borderwidth 1 -text "This application provides a collection of visual tests for the Tk toolkit.  Each menu entry invokes a test, which displays information on the screen.  You can then verify visually that the information is being displayed in the correct way.  The tests under the \"Postscript\" menu exercise the Postscript-generation capabilities of canvas widgets."
 
     pack .menu -side top -fill x
     pack .msg -side bottom -expand yes -fill both
@@ -69,26 +69,26 @@ test 1.1 {running visual tests} -constraints userInteraction -body {
     menu .menu.group1.m
     .menu.group1.m add command -label "Canvas arcs" -command {runTest arc.tcl}
     .menu.group1.m add command -label "Beveled borders in text widgets" \
-        -command {runTest bevel.tcl}
+	-command {runTest bevel.tcl}
     .menu.group1.m add command -label "Colormap management" \
-        -command {runTest cmap.tcl}
+	-command {runTest cmap.tcl}
     .menu.group1.m add command -label "Label/button geometry" \
-        -command {runTest butGeom.tcl}
+	-command {runTest butGeom.tcl}
     .menu.group1.m add command -label "Label/button colors" \
-        -command {runTest butGeom2.tcl}
+	-command {runTest butGeom2.tcl}
 
     menubutton .menu.ps -text "Canvas Postscript" -menu .menu.ps.m
     menu .menu.ps.m
     .menu.ps.m add command -label "Rectangles and other graphics" \
-        -command {runTest canvPsGrph.tcl}
+	-command {runTest canvPsGrph.tcl}
     .menu.ps.m add command -label "Text" \
-        -command {runTest canvPsText.tcl}
+	-command {runTest canvPsText.tcl}
     .menu.ps.m add command -label "Bitmaps" \
-        -command {runTest canvPsBmap.tcl}
+	-command {runTest canvPsBmap.tcl}
     .menu.ps.m add command -label "Images" \
-        -command {runTest canvPsImg.tcl}
+	-command {runTest canvPsImg.tcl}
     .menu.ps.m add command -label "Arcs" \
-        -command {runTest canvPsArc.tcl}
+	-command {runTest canvPsArc.tcl}
 
     pack .menu.file .menu.group1 .menu.ps -side left -padx 1m
 
@@ -96,7 +96,7 @@ test 1.1 {running visual tests} -constraints userInteraction -body {
 
     bind . <FocusIn> {
     if {("%d" == "NotifyVirtual") && ("%m" == "NotifyNormal")} {
-        focus .menu
+	focus .menu
     }
     }
     tk_menuBar .menu .menu.file .menu.group1 .menu.ps