Function: perl-mark-function

perl-mark-function is an interactive and byte-compiled function defined in perl-mode.el.gz.

Signature

(perl-mark-function)

Documentation

Put mark at end of Perl function, point at beginning.

Key Bindings

Aliases

mark-perl-function (obsolete since 29.1)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/perl-mode.el.gz
(defun perl-mark-function ()
  "Put mark at end of Perl function, point at beginning."
  (interactive)
  (push-mark)
  (perl-end-of-function)
  (push-mark)
  (perl-beginning-of-function)
  (backward-paragraph))