X-Git-Url: http://gitweb.michael.orlitzky.com/?p=nagios-mode.git;a=blobdiff_plain;f=nagios-mode.el;h=90cd09f779c22f0e09b6f00709187a3edc223479;hp=c08d7630f329bc66fbe7d29b5180ecb9de357659;hb=ae9271f002adeb7337b826aa0e44b39d84e1a938;hpb=059a04553048bddc25e443d6cb713ccc37f2740e diff --git a/nagios-mode.el b/nagios-mode.el index c08d763..90cd09f 100644 --- a/nagios-mode.el +++ b/nagios-mode.el @@ -59,7 +59,7 @@ ) ) -(defun pos-offset() +(defun point-offset() ;; How far are we from the beginning of the line? (- (point) (beginning-of-line-pos)) ) @@ -68,7 +68,8 @@ ;; How far is the first character on this line ;; from the beginning of the line? (save-excursion - (+ (pos-offset) (skip-chars-forward " \t")) + (beginning-of-line) + (skip-chars-forward " \t") ) ) @@ -79,7 +80,6 @@ (defun nagios-indent-to(indent-column) "Indent the current line to column indent-column." - ;; Store the point in orig-pos. (let ((orig-point (point)))