From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 10 Apr 1995 08:00:16 +0000 (+0000)
Subject: (make_terminal_frame): Use Emacs, Emacs-2, ... as name.
X-Git-Tag: emacs-19.34~4503
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f0052565fd0b73cf03f415668bb92a576f2a14f;p=emacs.git

(make_terminal_frame): Use Emacs, Emacs-2, ... as name.
---

diff --git a/src/frame.c b/src/frame.c
index 31b9115352f..60b462933b3 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -353,9 +353,16 @@ make_terminal_frame ()
   Vframe_list = Fcons (frame, Vframe_list);
 
   terminal_frame_count++;
-  sprintf (name, "terminal-%d", terminal_frame_count);
+  if (terminal_frame_count == 1)
+    {
+      f->name = build_string ("Emacs");
+    }
+  else
+    {
+      sprintf (name, "Emacs-%d", terminal_frame_count);
+      f->name = build_string (name);
+    }
 
-  f->name = build_string (name);
   f->visible = 1;		/* FRAME_SET_VISIBLE wd set frame_garbaged. */
   f->async_visible = 1;		/* Don't let visible be cleared later. */
   f->display.nothing = 1;	/* Nonzero means frame isn't deleted.  */