/[emacs]/emacs/lisp/term/vt100.el
ViewVC logotype

Diff of /emacs/lisp/term/vt100.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17 by dann, Wed Jul 27 18:02:07 2005 UTC revision 1.18 by ttn, Mon Aug 1 15:44:22 2005 UTC
# Line 1  Line 1 
1  ;;; vt100.el --- define VT100 function key sequences in function-key-map  ;;; vt100.el --- define VT100 function key sequences in function-key-map
2    
3  ;; Copyright (C) 1989, 1993 Free Software Foundation, Inc.  ;; Copyright (C) 1989, 1993, 2002, 2003, 2004,
4    ;;   2005 Free Software Foundation, Inc.
5    
6  ;; Author: FSF  ;; Author: FSF
7  ;; Keywords: terminals  ;; Keywords: terminals
# Line 41  Line 42 
42  (defun terminal-init-vt100 ()  (defun terminal-init-vt100 ()
43    "Terminal initialization function for vt100."    "Terminal initialization function for vt100."
44    (load "term/lk201" nil t))    (load "term/lk201" nil t))
45      
46  ;;; Controlling the screen width.  ;;; Controlling the screen width.
47  (defvar vt100-wide-mode (= (frame-width) 132)  (defvar vt100-wide-mode (= (frame-width) 132)
48    "t if vt100 is in 132-column mode.")    "t if vt100 is in 132-column mode.")

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26