🚀 go-pugleaf

	Emacs version: GNU Emacs 19.25.95

	Here's a fix for a bug which manifests itself when
	split-window-horizontally is used on a machine where
	sizeof (int) != sizeof (pointer), eg. alpha.  This results in
	a garbled display when using motion commands.

	The reason is that too many glyphs are copied from the
	other window(s) to desired_frame->glyphs[vpos].

	I know the alpha isn't officially supported, but the bug
	should still be fixed.

	Regards,
	jtp

HELLO KITTY gang terrorizes town, family STICKERED to death!

*** dispnew.c.orig	Tue Sep  6 18:36:11 1994
--- dispnew.c	Thu Sep  8 13:51:41 1994
*************** preserve_other_columns (w)
*** 851,860 ****
  
  	      bcopy (current_frame->glyphs[vpos],
  		     desired_frame->glyphs[vpos],
! 		     start * sizeof (current_frame->glyphs[vpos]));
  	      bcopy (current_frame->charstarts[vpos],
  		     desired_frame->charstarts[vpos],
! 		     start * sizeof (current_frame->charstarts[vpos]));
  	      len = min (start, current_frame->used[vpos]);
  	      if (desired_frame->used[vpos] < len)
  		desired_frame->used[vpos] = len;
--- 851,860 ----
  
  	      bcopy (current_frame->glyphs[vpos],
  		     desired_frame->glyphs[vpos],
! 		     start * sizeof (current_frame->glyphs[vpos][0]));
  	      bcopy (current_frame->charstarts[vpos],
  		     desired_frame->charstarts[vpos],
! 		     start * sizeof (current_frame->charstarts[vpos][0]));
  	      len = min (start, current_frame->used[vpos]);
  	      if (desired_frame->used[vpos] < len)
  		desired_frame->used[vpos] = len;
*************** preserve_other_columns (w)
*** 871,881 ****
  	      bcopy (current_frame->glyphs[vpos] + end,
  		     desired_frame->glyphs[vpos] + end,
  		     ((current_frame->used[vpos] - end)
! 		      * sizeof (current_frame->glyphs[vpos])));
  	      bcopy (current_frame->charstarts[vpos] + end,
  		     desired_frame->charstarts[vpos] + end,
  		     ((current_frame->used[vpos] - end)
! 		      * sizeof (current_frame->charstarts[vpos])));
  	      desired_frame->used[vpos] = current_frame->used[vpos];
  	    }
  	}
--- 871,881 ----
  	      bcopy (current_frame->glyphs[vpos] + end,
  		     desired_frame->glyphs[vpos] + end,
  		     ((current_frame->used[vpos] - end)
! 		      * sizeof (current_frame->glyphs[vpos][0])));
  	      bcopy (current_frame->charstarts[vpos] + end,
  		     desired_frame->charstarts[vpos] + end,
  		     ((current_frame->used[vpos] - end)
! 		      * sizeof (current_frame->charstarts[vpos][0])));
  	      desired_frame->used[vpos] = current_frame->used[vpos];
  	    }
  	}