X-Git-Url: http://gitweb.michael.orlitzky.com/?p=nagios-mode.git;a=blobdiff_plain;f=nagios-mode.el;h=33a5742dce47478b8105706afbc9fa866e16b676;hp=90cd09f779c22f0e09b6f00709187a3edc223479;hb=5fa275977e46b64c6336523696558049a8a7157d;hpb=ae9271f002adeb7337b826aa0e44b39d84e1a938 diff --git a/nagios-mode.el b/nagios-mode.el index 90cd09f..33a5742 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) + ) ) ) ) @@ -152,12 +158,12 @@ (defun nagios-calculate-indent() "Calculate the level of indentation." - ;; We're either inside a block, or we aren't. + ;; We're either inside a block, or we aren't. ;; Initialize the indent variable to either nagios-indent-level ;; or 0 depending on whether or not we're in a block. (let ((indent (if (nagios-in-block) - (setq indent nagios-indent-level) + nagios-indent-level 0) ) )