view lisp/term/vt125.el @ 86155:39b88001b04b

(pc-select-shifted-mark): New var. (ensure-mark): Set it. (maybe-deactivate-mark): New fun. Use it everywhere instead of (setq mark-active nil)
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 16 Nov 2007 17:58:30 +0000
parents 673d62ad74b5
children bdb3fe0ba9fa 1e3a407766b9
line wrap: on
line source

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

(defun terminal-init-vt125 ()
  "Terminal initialization function for vt125."
  (tty-run-terminal-initialization (selected-frame) "vt100"))

;;; arch-tag: 1d92d70f-dd55-4a1d-9088-e215a4883801
;;; vt125.el ends here