Lines Matching defs:line
60 ;; Is it the first non-white character on the line?
63 (goto-char (line-end-position 0))
65 ;; If we're continuing the previous line, it's not a
68 ;; Except if the previous line is a comment as well, as the
72 (let ((line-end (line-end-position)))
75 (unless (= line-end (1+ (buffer-size)))
76 (put-text-property line-end (1+ line-end) 'syntax-table '(12)))))))))
79 "Calculate indentation for the current line."
81 (beginning-of-line)
83 (= (line-number-at-pos) 1))
85 (forward-line -1)
90 (defun ninja-indent-line ()
91 "Indent the current line. Uses previous indentation level if
94 (indent-line-to (ninja-compute-indentation)))
101 (set (make-local-variable 'indent-line-function) 'ninja-indent-line)