diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-01 15:15:46 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-01 15:15:46 (GMT) |
commit | 67acc8945524908e6b8e9e1f8b1f949d3a146e11 (patch) | |
tree | ce07568e15418586794d34eedbaa04e6f1db2dc9 /library/platform | |
parent | 573f9fd80810dede88587f8ec61fb5cbb4a100b8 (diff) | |
download | tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.zip tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.tar.gz tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.tar.bz2 |
Whitespace reduction in Tcl scripts. No functional change.
Diffstat (limited to 'library/platform')
-rw-r--r-- | library/platform/platform.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/platform/platform.tcl b/library/platform/platform.tcl index 1bce7b5..e0bcce6 100644 --- a/library/platform/platform.tcl +++ b/library/platform/platform.tcl @@ -323,7 +323,7 @@ proc ::platform::patterns {id} { lappend res macosx-universal macosx-i386-x86_64 } macosx*-* { - # 10.5+ + # 10.5+ if {[regexp {macosx([^-]*)-(.*)} $id -> v cpu]} { switch -exact -- $cpu { |