Make Edwin window have X resource class "Emacs".

diff --git a/v7/src/edwin/xterm.scm b/v7/src/edwin/xterm.scm
index ffdc9fedb17d30f589584709b393d1f21f26a13e..36a4bd3b56e8be0099efddb0dda4e77a795d3748 100644 (file)
--- a/v7/src/edwin/xterm.scm
+++ b/v7/src/edwin/xterm.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/xterm.scm,v 1.32 1992/03/14 00:01:14 cph Exp $
+;;;    $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/edwin/xterm.scm,v 1.33 1992/03/25 21:40:10 cph Exp $
 ;;;
 ;;;    Copyright (c) 1989-92 Massachusetts Institute of Technology
 ;;;
@@ -127,7 +127,7 @@
                                        (error "unable to open display"))
                                    (and (not (default-object? geometry))
                                         geometry)
-                                   '("edwin" . "Edwin"))))
+                                   '("edwin" . "Emacs"))))
           (x-window-set-event-mask xterm event-mask)
           (make-screen (make-xterm-screen-state xterm
                                                 (x-window-display xterm))