From f1e13b4dd1e203e6902b78af0cebe03d9be5f53b Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 29 May 1997 06:57:11 +0000 Subject: [PATCH] (edt-emulation-on): Handle absence of TERM envvar. --- lisp/emulation/edt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/emulation/edt.el b/lisp/emulation/edt.el index 18deb138d96..f03a2b8cf11 100644 --- a/lisp/emulation/edt.el +++ b/lisp/emulation/edt.el @@ -1485,7 +1485,7 @@ If FILE is nil, try to load a default file. The default file names are ;; If using MS-DOS or Windows, need to load edt-pc.el (if (memq system-type '(ms-dos windows-nt)) (setq edt-term "pc") - (setq edt-term (getenv "TERM"))) + (setq edt-term (or (getenv "TERM") ""))) ;; All DEC VT series terminals are supported by loading edt-vt100.el (if (string-equal "vt" (substring edt-term 0 (min (length edt-term) 2))) (setq edt-term "vt100")) -- 2.39.2