From 9db78fde3b4a50cf4aa3aa207c157f74118dbef1 Mon Sep 17 00:00:00 2001 From: Michael Orlitzky Date: Fri, 20 Aug 2010 18:41:45 -0400 Subject: [PATCH] If the point is left of indent-column after nagios-indent-to, move it to indent-column. --- nagios-mode.el | 6 ++++++ 1 file changed, 6 insertions(+) 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) + ) ) ) ) -- 2.44.2