From: Michael Orlitzky <michael@orlitzky.com>
Date: Fri, 20 Aug 2010 22:41:45 +0000 (-0400)
Subject: If the point is left of indent-column after nagios-indent-to, move it to indent-column.
X-Git-Tag: v0.3~10
X-Git-Url: http://gitweb.michael.orlitzky.com/?p=nagios-mode.git;a=commitdiff_plain;h=9db78fde3b4a50cf4aa3aa207c157f74118dbef1;hp=ae9271f002adeb7337b826aa0e44b39d84e1a938

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

diff --git a/nagios-mode.el b/nagios-mode.el
index 90cd09f..61cf412 100644
--- 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)
+      )
     )
   )
 )