Function: perl-continuation-line-p

perl-continuation-line-p is a byte-compiled function defined in perl-mode.el.gz.

Signature

(perl-continuation-line-p)

Documentation

Move to end of previous line and return non-nil if continued.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/perl-mode.el.gz
(defun perl-continuation-line-p ()
  "Move to end of previous line and return non-nil if continued."
  ;; Statement level.  Is it a continuation or a new statement?
  ;; Find previous non-comment character.
  (perl-backward-to-noncomment)
  ;; Back up over label lines, since they don't
  ;; affect whether our line is a continuation.
  (while (and (eq (preceding-char) ?:)
              (memq (char-syntax (char-after (- (point) 2)))
                    '(?w ?_)))
    (beginning-of-line)
    (perl-backward-to-noncomment))
  ;; Now we get the answer.
  (unless (or (memq (preceding-char) '(?\; ?\} ?\{))
              (perl--end-of-format-p))
    (preceding-char)))