Automatically strip leading whitespace from all typing environments.

[matthijs/master-project/report.git] / pret-lam.lua

diff --git a/pret-lam.lua b/pret-lam.lua
index 6935043297ee5077a9e77495187b4ad0623e7662..be2c55b02eb18fa30006e64aa554c273e1c3fb7d 100644 (file)
--- a/pret-lam.lua
+++ b/pret-lam.lua
@@ -25,6 +25,7 @@ local symbols = {
     ['*'] = {repr = '\\ast'},
     ['~'] = {repr = '\\HDLine[width=.20 * \\the\\textwidth]'},
     ['|'] = {repr = '\\char' .. utf.byte('|')},
+    ['$'] = {repr = '\\char' .. utf.byte('$')},
 }
 
 -- Keywords that should be bold
@@ -43,10 +44,6 @@ local submatches = {}
 local bases = {}
 -- Store the last line for each indent level
 local indentlines = {}
--- The amount of indent of the first line, which we will strip of all
--- subsequent lines. This allows the entire block to be indented as normal in
--- the tex source code.
-local first_indent
 
 -- See if str starts with a symbol, and return the remaining string and that
 -- symbol. If no symbol from the table is matched, just returns the first
@@ -133,17 +130,6 @@ end
 --   line4, and line is no longer in scope since it is replaced by line4.
 local function do_indent(line)
     newind, rest = utf.match(line, '^(%s*)(.*)')
-  
-    -- Store the first line's indent
-    if not first_indent then 
-        first_indent = utf.len(newind)
-    end
-
-    -- Strip the indent of the first line from this line's indent.
-    newind = utf.sub(newind, first_indent + 1) 
-    -- Rebuild line, so we can still use it below
-    line = newind .. rest
-
     prev = -1
     -- Loop all the previous lines
     for indent, unused in pairs(indentlines) do
@@ -214,7 +200,6 @@ function vis.begin_of_display()
         bases = {}
     end
     indentlines = {}
-    first_indent = nil
 end