Function: tpu-toggle-newline-and-indent
tpu-toggle-newline-and-indent is an interactive and byte-compiled
function defined in tpu-edt.el.gz.
Signature
(tpu-toggle-newline-and-indent)
Documentation
Toggle between newline-and-indent and simple newline.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/obsolete/tpu-edt.el.gz
(defun tpu-toggle-newline-and-indent nil
"Toggle between `newline-and-indent' and simple `newline'."
(interactive)
(cond (tpu-newline-and-indent-p
(setq tpu-newline-and-indent-string "")
(setq tpu-newline-and-indent-p nil)
(tpu-local-set-key "\C-m" 'newline))
(t
(setq tpu-newline-and-indent-string " AutoIndent")
(setq tpu-newline-and-indent-p t)
(tpu-local-set-key "\C-m" 'newline-and-indent)))
(tpu-update-mode-line)
(and (called-interactively-p 'interactive)
(message "Carriage return inserts a newline%s"
(if tpu-newline-and-indent-p " and indents." "."))))