From 1c5916d3f278f71c9f30369091acac080cc8321b Mon Sep 17 00:00:00 2001
From: Charlie Gorichanaz <charlie@gorichanaz.com>
Date: Tue, 22 Apr 2014 20:26:21 +0900
Subject: [PATCH] Add Movable Type Markup Language support

---
 lib/linguist/languages.yml              |  6 +++++
 samples/MTML/categories_to_columns.mtml | 35 +++++++++++++++++++++++++
 2 files changed, 41 insertions(+)
 create mode 100644 samples/MTML/categories_to_columns.mtml

diff --git a/lib/linguist/languages.yml b/lib/linguist/languages.yml
index d77f5622..e53f8784 100644
--- a/lib/linguist/languages.yml
+++ b/lib/linguist/languages.yml
@@ -1106,6 +1106,12 @@ M:
   extensions:
   - .m
 
+MTML:
+  type: markup
+  lexer: HTML
+  color: "#0095d9"
+  primary_extension: .mtml
+
 Makefile:
   aliases:
   - make
diff --git a/samples/MTML/categories_to_columns.mtml b/samples/MTML/categories_to_columns.mtml
new file mode 100644
index 00000000..a46c0674
--- /dev/null
+++ b/samples/MTML/categories_to_columns.mtml
@@ -0,0 +1,35 @@
+<$mt:Var name="num_cols" value="6"$>
+<$mt:Var name="index" value="0"$>
+<mt:Categories>
+  <$mt:Var name="index" op="++" setvar="index"$>
+  <mt:SetVarBlock name="categories{$index}">
+    <a href="<$mt:CategoryArchiveLink$>"><$mt:CategoryLabel remove_html="1"$></a>
+  </mt:SetVarBlock>
+</mt:Categories>
+<$mt:Var name="categories" function="count" setvar="cat_count"$>
+<$mt:Var name="cat_count" op="%" value="$num_cols" setvar="modulus"$>
+<mt:If name="modulus" gt="0">
+  <$mt:Var name="cat_count" op="-" value="$modulus" setvar="cat_count_minus_mod"$>
+  <$mt:Var name="cat_count_minus_mod" op="/" value="$num_cols" setvar="cats_per_col"$>
+  <$mt:Var name="cats_per_col" op="+" value="1" setvar="cats_per_col"$>
+<mt:Else>
+  <$mt:Var name="cat_count" op="/" value="$num_cols" setvar="cats_per_col"$>
+</mt:If>
+<mt:SetVarTemplate name="for_inner">
+  <$mt:Var name="index" op="++" setvar="index"$>
+  <mt:Unless name="index" gt="$cat_count">
+    <$mt:Var name="categories{$index}"$>
+  </mt:Unless>
+</mt:SetVarTemplate>
+
+<$mt:Var name="index" value="0"$>
+<$mt:Var name="col_num" value="1"$>
+<mt:For from="1" to="$num_cols">
+  <div class="col<$mt:Var name="col_num"$>">
+    <mt:For from="1" to="$cats_per_col">
+      <$mt:Var name="for_inner"$>
+    </mt:For>
+  </div>
+  <$mt:Var name="col_num" op="++" setvar="col_num"$>
+</mt:For>
+