Tk Library Source Code

Artifact 6469e65df9f1b84dee8e096baac0dde18cba751d:

Attachment "notebook.diff" to ticket [1451784fff] added by wordtech 2006-03-17 06:46:49.

---

--- /Library/Tcl/bwidget1.7/notebook.tcl	2006-03-15 14:40:59.000000000 -0500
+++ /Users/kevin/Desktop/bwidget/notebook.tcl	2005-01-25 20:01:26.000000000 -0500
@@ -643,21 +643,11 @@
 
     switch -- $type {
         on {
-           if {[string equal [tk windowingsystem] aqua]} {
             $path.c itemconfigure "$page:poly" \
-		    -fill LightSkyBlue
-		    } else {
-		     $path.c itemconfigure "$page:poly" \
 		    -fill [_getoption $path $page -activebackground]
-		    }
-		     if {[string equal [tk windowingsystem] aqua]} {
-            $path.c itemconfigure "$page:text" \
-		    -fill black
-		    } else {
             $path.c itemconfigure "$page:text" \
 		    -fill [_getoption $path $page -activeforeground]
         }
-        }
         off {
             $path.c itemconfigure "$page:poly" \
 		    -fill [_getoption $path $page -background]