If the point is left of indent-column after nagios-indent-to, move it to indent-column.

[nagios-mode.git] / nagios-mode.el

diff --git a/nagios-mode.el b/nagios-mode.el
index 90cd09f779c22f0e09b6f00709187a3edc223479..61cf412b64dba9745273b1b06efab7e626ab1ac4 100644 (file)
--- a/nagios-mode.el
+++ b/nagios-mode.el
@@ -102,6 +102,12 @@
       (let ((text-delta (- (first-char-offset) orig-first-char-offset)))
        (goto-char (+ orig-point text-delta))
       )
+
+      ;; The point should never wind up to the left of indent-column, so
+      ;; if it's there, move it over to indent-column.
+      (if (< (point-offset) indent-column)
+         (goto-char indent-column)
+      )
     )
   )
 )