[Emacs-diffs] trunk r113356: * progmodes/cfengine.el: Do not indent inside continued strings.

[Teodor Zlatanov]

------------------------------------------------------------
revno: 113356
revision-id: address@hidden
parent: address@hidden
committer: Ted Zlatanov <address@hidden>
branch nick: quickfixes
timestamp: Wed 2013-07-10 10:34:13 -0400
message:
  * progmodes/cfengine.el: Do not indent inside continued strings.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/cfengine.el     
cfengine.el-20091113204419-o5vbwnq5f7feedwu-2944

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-07-10 06:26:23 +0000
+++ b/lisp/ChangeLog    2013-07-10 14:34:13 +0000
@@ -1,3 +1,8 @@
+2013-07-10  Teodor Zlatanov  <address@hidden>
+
+       * progmodes/cfengine.el (cfengine3-indent-line): Do not indent
+       inside continued strings.
+
 2013-07-10  Paul Eggert  <address@hidden>
 
        Timestamp fixes for undo (Bug#14824).

=== modified file 'lisp/progmodes/cfengine.el'
--- a/lisp/progmodes/cfengine.el        2013-06-18 22:13:25 +0000
+++ b/lisp/progmodes/cfengine.el        2013-07-10 14:34:13 +0000
@@ -387,10 +387,10 @@
                               (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.