From c7a4d3688ebdee56857af83ab86ab5f2a4065aa6 Mon Sep 17 00:00:00 2001 From: Ted Zlatanov Date: Wed, 10 Jul 2013 10:34:13 -0400 Subject: [PATCH] * progmodes/cfengine.el: Do not indent inside continued strings. --- lisp/ChangeLog | 5 +++++ lisp/progmodes/cfengine.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 91ce836617c..c159daa161d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2013-07-10 Teodor Zlatanov + + * progmodes/cfengine.el (cfengine3-indent-line): Do not indent + inside continued strings. + 2013-07-10 Paul Eggert Timestamp fixes for undo (Bug#14824). diff --git a/lisp/progmodes/cfengine.el b/lisp/progmodes/cfengine.el index 55d5b8b0be7..85a9074760d 100644 --- 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. -- 2.39.2