try using native Windows theme

nhanb · Jun 19, 2023 · 678c798 · 678c798
1 parent 67819e5
commit 678c798
Showing 1 changed file with 8 additions and 9 deletions.
diff --git a/tcl/main.tcl b/tcl/main.tcl
@@ -13,15 +13,14 @@ package require Tk
 wm title . "Overly Repetitive Tedious Software (in Go)"
 tk appname gorts
 
-#set OS [lindex $tcl_platform(os) 0]
-#if {$OS == "Windows"} {
-    #ttk::style theme use vista
-#} elseif {$OS == "Darwin"} {
-    #ttk::style theme use aqua
-#} else {
-    #ttk::style theme use clam
-#}
-ttk::style theme use clam
+set OS [lindex $tcl_platform(os) 0]
+if {$OS == "Windows"} {
+    ttk::style theme use vista
+} elseif {$OS == "Darwin"} {
+    ttk::style theme use aqua
+} else {
+    ttk::style theme use clam
+}
 
 wm protocol . WM_DELETE_WINDOW {
     exit 0