Repos / gorts / 678c79824f
commit 678c79824fcd390c99866120771a7f39546555fd
Author: Nhân <hi@imnhan.com>
Date: Mon Jun 19 20:41:36 2023 +0700
try using native Windows theme
diff --git a/tcl/main.tcl b/tcl/main.tcl
index 97a5d8c..917eb9b 100644
--- 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