Function: cperl-pod-spell

cperl-pod-spell is an interactive and byte-compiled function defined in cperl-mode.el.gz.

Signature

(cperl-pod-spell &optional DO-HERES)

Documentation

Spell-check POD documentation. Do here-docs if DO-HERES.

If invoked with prefix argument, will do HERE-DOCs instead. If a region is highlighted, restricts to the region.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
(defun cperl-pod-spell (&optional do-heres)
  "Spell-check POD documentation.  Do here-docs if DO-HERES.
If invoked with prefix argument, will do HERE-DOCs instead.
If a region is highlighted, restricts to the region."
  (interactive "P")
  (save-excursion
    (let (beg end)
      (if (region-active-p)
	  (setq beg (min (mark) (point))
		end (max (mark) (point)))
	(setq beg (point-min)
	      end (point-max)))
      (cperl-map-pods-heres (lambda (s e _p)
                         (if do-heres
                             (setq e (save-excursion
                                       (goto-char e)
                                       (forward-line -1)
                                       (point))))
                         (ispell-region s e)
                         t)
			    (if do-heres 'here-doc-group 'in-pod)
			    beg end))))