   (when (re-search-forward "^ *\\([-=~]\\) \\(.*\\)$" limit t)
     (haml-fontify-region-as-ruby (match-beginning 2) (match-end 2))))
 
-(defun* haml-highlight-ruby-tag (limit)
+(defun haml-highlight-ruby-tag (limit)
   "Highlight Ruby code within a Haml tag.
 
 This highlights the tag attributes and object refs of the tag,

        ;; Give font-lock something to highlight
        (looking-at "\\(\\)"))
      t)))

(defun* haml-extend-region ()
  "Extend the font-lock region to encompass filters and comments."

        (goto-char (match-end 0)))

      ;; Highlight attr hashes and obj refs
      (dolist (char '(?\{ ?\[))
        (when (eq (char-after) char)
          (let ((beg (point)))
            (haml-limited-forward-sexp eol)
            (haml-fontify-region-as-ruby beg (point)))))

      ;; Move past end chars
