[nongnu] elpa/lua-mode 9645322 124/468: lua-indent-line: add lua-indent-string-contents custom variable to enable indenting multiline strings if necessary (issue #6)

[Philip Kaludercic]

branch: elpa/lua-mode
commit 964532223036b28ac4bed842d6a0fd4bae0b6fda
Author: immerrr <immerrr+lua@gmail.com>
Commit: immerrr <immerrr+lua@gmail.com>

    lua-indent-line: add lua-indent-string-contents custom variable to enable 
indenting multiline strings if necessary (issue #6)
---
 lua-mode.el | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lua-mode.el b/lua-mode.el
index aa2939b..a7cc482 100644
--- a/lua-mode.el
+++ b/lua-mode.el
@@ -214,6 +214,12 @@ If the latter is nil, the keymap translates into 
`lua-mode-map' verbatim.")
   :type 'regexp
   :group 'lua)
 
+(defcustom lua-indent-string-contents nil
+  "If non-nil, contents of multiline string will be indented.
+Otherwise leading amount of whitespace on each line is preserved."
+  :group 'lua
+  :type 'boolean)
+
 (defcustom lua-jump-on-traceback t
   "*Jump to innermost traceback location in *lua* buffer.  When this
 variable is non-nil and a traceback occurs when running Lua code in a
@@ -434,7 +440,7 @@ Return the amount the indentation changed by."
         ;; save point as a distance to eob - it's invariant w.r.t indentation
         (pos (- (point-max) (point))))
     (back-to-indentation)
-    (if (lua-string-p)  ;; don't indent if inside multiline string literal
+    (if (and (not lua-indent-string-contents) (lua-string-p))
         (goto-char (- (point-max) pos)) ;; just restore point position
 
       (setq indent (max 0 (- (lua-calculate-indentation nil)