# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 795131389 0
# Node ID e72bd65cab70d38c2d24d91dd9e4d2cfc547d7ef
# Parent  a42bf0c8a5ad3d2df61c7f470207ef6249c4bc83
(print): current_perdisplay now is never null.

diff -r a42bf0c8a5ad -r e72bd65cab70 src/print.c
--- a/src/print.c	Mon Mar 13 21:49:34 1995 +0000
+++ b/src/print.c	Mon Mar 13 21:49:49 1995 +0000
@@ -1051,12 +1051,9 @@
 
 	case Lisp_Misc_Display_Objfwd:
 	  strout (buf, "#<display_objfwd to ", -1, printcharfun);
-	  if (!current_perdisplay)
-	    strout ("no-current-perdisplay");
-	  else
-	    print (*(Lisp_Object *)((char *) current_perdisplay
-				    + XDISPLAY_OBJFWD (obj)->offset),
-		   printcharfun, escapeflag);
+	  print (*(Lisp_Object *)((char *) current_perdisplay
+				  + XDISPLAY_OBJFWD (obj)->offset),
+		 printcharfun, escapeflag);
 	  PRINTCHAR ('>');
 	  break;