view lisp/term/bobcat.el @ 96708:ceb7b0d5c55f

(cl-do-pop, cl-mapcar-many): Declare for compiler. (cl-hack-byte-compiler): Load cl-macs and run cl-hack-bytecomp-hook directly. Provide cl before loading cl-macs.

;; -*- no-byte-compile: t -*-

(defun terminal-init-bobcat ()
  "Terminal initialization function for bobcat."
  ;; HP terminals usually encourage using ^H as the rubout character
  (keyboard-translate ?\177 ?\^h)
  (keyboard-translate ?\^h ?\177))

;; arch-tag: 754e4520-0a3e-4e6e-8ca5-9481b1f85cf7
;;; bobcat.el ends here