Function: cperl-db

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

This command is obsolete since 31.1; use perldb' instead.

Signature

(cperl-db)

Documentation

Obsolete workaround for an outdated issue with perldb.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cperl-mode.el.gz
;; Fix for perldb - make default reasonable
(defun cperl-db ()
  "Obsolete workaround for an outdated issue with `perldb'."
  (declare (obsolete 'perldb "31.1"))
  (interactive)
  (require 'gud)
  ;; FIXME: Use `read-string' or `read-shell-command'?
  (perldb (read-from-minibuffer "Run perldb (like this): "
				(if (consp gud-perldb-history)
				    (car gud-perldb-history)
				  (concat "perl -d "
					  (buffer-file-name)))
				nil nil
				'(gud-perldb-history . 1))))