Function: tpu-undelete-lines

tpu-undelete-lines is an interactive and byte-compiled function defined in tpu-edt.el.gz.

Signature

(tpu-undelete-lines NUM)

Documentation

Insert lines deleted by last TPU-edt line-deletion command.

With argument reinserts lines that many times.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/tpu-edt.el.gz
(defun tpu-undelete-lines (num)
  "Insert lines deleted by last TPU-edt line-deletion command.
With argument reinserts lines that many times."
  (interactive "p")
  (let ((beg (point)))
    (while (> num 0)
      (insert tpu-last-deleted-lines)
      (setq num (1- num)))
    (goto-char beg)))