;ELC ;;; compiled by kwzh@churchy.gnu.ai.mit.edu on Sun Jun 11 18:39:07 1995 ;;; from file /gd/gnu/emacs/19.0/lisp/edt-vt100.el ;;; emacs version 19.28.93.1. ;;; bytecomp version FSF 2.10 ;;; optimization is on. ;;; this file uses opcodes which do not exist in Emacs 18. (if (and (boundp 'emacs-version) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.28.90"))) (error "`edt-vt100.el' was compiled for Emacs 19.29 or later")) (load "edt-lk201" nil t) #@33 Set screen width to 80 columns. (defalias 'edt-set-screen-width-80 #[nil "ÀÁ!ˆÂÃ!‡" [vt100-wide-mode -1 message "Screen width 80"] 2 (#$ . 509) nil]) #@34 Set screen width to 132 columns. (defalias 'edt-set-screen-width-132 #[nil "ÀÁ!ˆÂÃ!‡" [vt100-wide-mode 1 message "Screen width 132"] 2 (#$ . 665) nil])