mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-06 23:51:24 -08:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse source
This commit is contained in:
Jim Blandy 1991-11-09 01:34:02 +00:00
parent 90e65f0739
commit 42dcdd5fc7
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/print.c
View file

@ -889,7 +889,9 @@ print (obj, printcharfun, escapeflag)
#ifdef MULTI_SCREEN
case Lisp_Screen:
strout ("#<screen ", -1, printcharfun);
strout (((XSCREEN (obj)->display.nothing == 0)
? "#<dead screen " : "#<screen "),
-1, printcharfun);
print_string (XSCREEN (obj)->name, printcharfun);
sprintf (buf, " 0x%x", XFASTINT (XSCREEN (obj)));
strout (buf, -1, printcharfun);