* progmodes/cfengine.el: Do not indent inside continued strings.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 91ce836617c8a5f365d11bd37d7e6eaba4f8afc2..c159daa161d68c93005e815409942f971dc65670 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-10  Teodor Zlatanov  <tzz@lifelogs.com>
+
+       * progmodes/cfengine.el (cfengine3-indent-line): Do not indent
+       inside continued strings.
+
 2013-07-10  Paul Eggert  <eggert@cs.ucla.edu>
 
        Timestamp fixes for undo (Bug#14824).

diff --git a/lisp/progmodes/cfengine.el b/lisp/progmodes/cfengine.el
index 55d5b8b0be7f966bbbc6f5849d4a2b5bf95016ad..85a9074760d37503584fea9b663f50bf6db8063c 100644 (file)
--- a/lisp/progmodes/cfengine.el
+++ b/lisp/progmodes/cfengine.el
@@ -387,10 +387,10 @@ Intended as the value of `indent-line-function'."
                               (skip-chars-forward " \t")
                               (current-column)))
           (error nil)))
-       ;; Inside a string and it starts before this line.
+       ;; Inside a string and it starts before this line: do nothing.
        ((and (nth 3 parse)
              (< (nth 8 parse) (save-excursion (beginning-of-line) (point))))
-        (indent-line-to 0))
+        )
 
        ;; Inside a defun, but not a nested list (depth is 1).  This is
        ;; a promise, usually.