Function: tpu-local-set-key

tpu-local-set-key is a byte-compiled function defined in tpu-edt.el.gz.

Signature

(tpu-local-set-key KEY FUNC)

Documentation

Replace a key in the TPU-edt local key map.

Create the key map if necessary.

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/tpu-edt.el.gz
(defun tpu-local-set-key (key func)
  "Replace a key in the TPU-edt local key map.
Create the key map if necessary."
  (cond ((not (keymapp tpu-buffer-local-map))
	 (setq tpu-buffer-local-map (if (current-local-map)
					(copy-keymap (current-local-map))
				      (make-sparse-keymap)))
	 (use-local-map tpu-buffer-local-map)))
  (local-set-key key func))