From 7ae137a96fb44f02ae83e6b47adaced0eb550de9 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Mon, 13 Mar 1995 21:49:49 +0000
Subject: [PATCH] (print): current_perdisplay now is never null.

---
 src/print.c | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/src/print.c b/src/print.c
index 08663d10cdc..1810457cbba 100644
--- a/src/print.c
+++ b/src/print.c
@@ -1051,12 +1051,9 @@ print (obj, printcharfun, escapeflag)
 
 	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;
 
-- 
2.39.5