         (font-lock-fontify-region beg end)))))
 
 (defun sass-highlight-script-after-match ()
+  "Highlight a section of SassScript after the last match."
   (end-of-line)
   (sass-highlight-script (match-end 0) (point)))
 
 (defun sass-highlight-directive ()
+  "Highlight a Sass directive."
   (goto-char (match-end 0))
   (block nil
     (case (intern (match-string 1))

(defvar sass-non-block-openers
  '("^ *:[^ \t]+[ \t]+[^ \t]"
    "^ *[^ \t:]+[ \t]*[=:][ \t]*[^ \t]")
  "A list of regexps that match lines of Sass that couldn't have
text nested beneath them.")

;; Font lock


;; Indentation

(defun sass-indent-p ()
  "Return non-nil if the current line can have lines nested beneath it."
  (loop for opener in sass-non-block-openers
        unless (looking-at opener) return t
        return nil))
