Mercurial > emacs

comparison lisp/emulation/edt-mapper.el @ 95631:9a74acbaf005

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove unnecessary eval-when-compile.
author Glenn Morris <rgm@gnu.org>
date Sat, 07 Jun 2008 02:44:49 +0000
parents eb7b2376cae5
children 7ea2a6d03884
comparison
equal deleted inserted replaced
95630:eebbd7f32937 95631:9a74acbaf005
1 ;;; edt-mapper.el --- create an EDT LK-201 map file for X-Windows Emacs 1 ;;; edt-mapper.el --- create an EDT LK-201 map file for X-Windows Emacs
2 2
3 ;; Copyright (C) 1994, 1995, 2000, 2001, 2002, 2003, 2004, 3 ;; Copyright (C) 1994, 1995, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
4 ;; 2005, 2006, 2007, 2008 Free Software Foundation, Inc. 4 ;; 2007, 2008 Free Software Foundation, Inc.
5 5
6 ;; Author: Kevin Gallagher <Kevin.Gallagher@boeing.com> 6 ;; Author: Kevin Gallagher <Kevin.Gallagher@boeing.com>
7 ;; Maintainer: Kevin Gallagher <Kevin.Gallagher@boeing.com> 7 ;; Maintainer: Kevin Gallagher <Kevin.Gallagher@boeing.com>
8 ;; Keywords: emulations 8 ;; Keywords: emulations
9 9
141 (defvar edt-enter-seq nil) 141 (defvar edt-enter-seq nil)
142 (defvar edt-return-seq nil) 142 (defvar edt-return-seq nil)
143 (defvar edt-term nil) 143 (defvar edt-term nil)
144 144
145 ;; To silence the byte-compiler 145 ;; To silence the byte-compiler
146 (eval-when-compile 146 (defvar EDT-key-name)
147 (defvar EDT-key-name) 147 (defvar edt-save-function-key-map)
148 (defvar edt-save-function-key-map))
149 148
150 ;;; 149 ;;;
151 ;;; Determine Terminal Type (if appropriate). 150 ;;; Determine Terminal Type (if appropriate).
152 ;;; 151 ;;;
153 152