TextMate support for fhtml

diff --git a/contrib/textmate/Factor.tmbundle/Syntaxes/HTML (Factor).tmLanguage b/contrib/textmate/Factor.tmbundle/Syntaxes/HTML (Factor).tmLanguage
new file mode 100644 (file)
index 0000000..963fafc
--- /dev/null
+++ b/contrib/textmate/Factor.tmbundle/Syntaxes/HTML (Factor).tmLanguage
@@ -0,0 +1,52 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+       <key>fileTypes</key>
+       <array>
+               <string>fhtml</string>
+       </array>
+       <key>foldingStartMarker</key>
+       <string>(?x)
+               (&lt;(?i:head|body|table|thead|tbody|tfoot|tr|div|select|fieldset|style|script|ul|ol|form|dl)\b.*?&gt;
+               |&lt;!--(?!.*--&gt;)
+               |\{\s*($|\?&gt;\s*$|//|/\*(.*\*/\s*$|(?!.*?\*/)))
+               )</string>
+       <key>foldingStopMarker</key>
+       <string>(?x)
+               (&lt;/(?i:head|body|table|thead|tbody|tfoot|tr|div|select|fieldset|style|script|ul|ol|form|dl)&gt;
+               |^\s*--&gt;
+               |(^|\s)\}
+               )</string>
+       <key>keyEquivalent</key>
+       <string>^~F</string>
+       <key>name</key>
+       <string>HTML (Factor)</string>
+       <key>patterns</key>
+       <array>
+               <dict>
+                       <key>begin</key>
+                       <string>&lt;%\s</string>
+                       <key>end</key>
+                       <string>\s%&gt;</string>
+                       <key>name</key>
+                       <string>source.factor.embedded.html</string>
+                       <key>patterns</key>
+                       <array>
+                               <dict>
+                                       <key>include</key>
+                                       <string>source.factor</string>
+                               </dict>
+                       </array>
+               </dict>
+               <dict>
+                       <key>include</key>
+                       <string>text.html.basic</string>
+               </dict>
+       </array>
+       <key>scopeName</key>
+       <string>text.html.factor</string>
+       <key>uuid</key>
+       <string>141517D7-73E0-4475-A481-71102575A175</string>
+</dict>
+</plist>