diff --git a/UltiSnips/tcl.snippets b/UltiSnips/tcl.snippets
new file mode 100644
index 0000000..6000abf
--- /dev/null
+++ b/UltiSnips/tcl.snippets
@@ -0,0 +1,49 @@
+###########################################################################
+#                            TEXTMATE SNIPPETS                            #
+###########################################################################
+snippet for "for... (for)" b
+for {${1:set i 0}} {${2:\$i < \$n}} {${3:incr i}} {
+	${4}
+}
+
+endsnippet
+
+snippet foreach "foreach... (foreach)"
+foreach ${1:var} ${2:\$list} {
+	${3}
+}
+
+endsnippet
+
+snippet if "if... (if)" b
+if {${1:condition}} {
+	${2}
+}
+
+endsnippet
+
+snippet proc "proc... (proc)" b
+proc ${1:name} {${2:args}} \
+{
+	${3}
+}
+
+endsnippet
+
+snippet switch "switch... (switch)" b
+switch ${1:-exact} -- ${2:\$var} {
+	${3:match} {
+		${4}
+	}
+	default {${5}}
+}
+
+endsnippet
+
+snippet while "while... (while)" b
+while {${1:condition}} {
+	${2}
+}
+
+endsnippet
+
diff --git a/UltiSnips/tm_tcl.snippets b/UltiSnips/tm_tcl.snippets
deleted file mode 100644
index 933dd5f..0000000
--- a/UltiSnips/tm_tcl.snippets
+++ /dev/null
@@ -1,46 +0,0 @@
-snippet for "for... (for)"
-for {${1:set i 0}} {${2:\$i < \$n}} {${3:incr i}} {
-	${4}
-}
-
-endsnippet
-
-snippet foreach "foreach... (foreach)"
-foreach ${1:var} ${2:\$list} {
-	${3}
-}
-
-endsnippet
-
-snippet if "if... (if)"
-if {${1:condition}} {
-	${2}
-}
-
-endsnippet
-
-snippet proc "proc... (proc)"
-proc ${1:name} {${2:args}} \\
-{
-	${3}
-}
-
-endsnippet
-
-snippet switch "switch... (switch)"
-switch ${1:-exact} -- ${2:\$var} {
-	${3:match} {
-		${4}
-	}
-	default {${5}}
-}
-
-endsnippet
-
-snippet while "while... (while)"
-while {${1:condition}} {
-	${2}
-}
-
-endsnippet
-