Function: edt-user-emulation-setup

edt-user-emulation-setup is a byte-compiled function defined in edt.el.gz.

Signature

(edt-user-emulation-setup)

Documentation

Setup user custom emulation of DEC's EDT editor.

Source Code

;; Defined in /usr/src/emacs/lisp/emulation/edt.el.gz
(defun edt-user-emulation-setup ()
  "Setup user custom emulation of DEC's EDT editor."
  ;; Initialize EDT default bindings.
  (edt-default-emulation-setup t)
  ;; Setup user EDT global map by copying default EDT global map bindings.
  (fset 'edt-user-ESC-prefix (copy-keymap 'edt-default-ESC-prefix))
  (setq edt-user-global-map (copy-keymap edt-default-global-map))
  (define-key edt-user-global-map "\e" 'edt-user-ESC-prefix)
  ;; If terminal has additional function keys, the user's initialization
  ;; file can assign bindings to them via the optional
  ;; function edt-setup-extra-default-bindings.
  (define-prefix-command 'edt-user-gold-map)
  (fset 'edt-user-gold-map (copy-keymap 'edt-default-gold-map))
  ;; This is a function that the user can define for custom bindings.
  ;; See Info node `edt' for more details, and sample edt-user.el file.
  (if (fboundp 'edt-setup-user-bindings)
      (edt-setup-user-bindings))
  (edt-select-user-global-map)
  ;; Keep the menu bar Buffers menu up-to-date in edt-user-global-map.
  (add-hook 'menu-bar-update-hook #'edt-user-menu-bar-update-buffers))