Function: cfengine2-beginning-of-defun

cfengine2-beginning-of-defun is a byte-compiled function defined in cfengine.el.gz.

Signature

(cfengine2-beginning-of-defun)

Documentation

beginning-of-defun function for CFEngine mode.

Treats actions as defuns.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cfengine.el.gz
(defun cfengine2-beginning-of-defun ()
  "`beginning-of-defun' function for CFEngine mode.
Treats actions as defuns."
  (unless (<= (current-column) (current-indentation))
    (end-of-line))
  (if (re-search-backward "^[[:alpha:]]+: *$" nil t)
      (beginning-of-line)
    (goto-char (point-min)))
  t)