Path: utzoo!utgpu!watmath!clyde!att!osu-cis!tut.cis.ohio-state.edu!mailrus!ames!amdcad!sun!pitstop!sundc!seismo!uunet!mcvax!hp4nl!dutrun!hans
From: hans@duttnph.UUCP (Hans Buurman)
Newsgroups: comp.mail.elm
Subject: Sun port of ELM 2.1 PL 1 (Was: Apollo port of ELM)
Summary: Thanks, Fons !
Keywords: elm
Message-ID: <549@dutrun.UUCP>
Date: 19 Nov 88 11:04:23 GMT
References: <572@nikhefh.hep.nl>
Sender: tnphnws@dutrun.UUCP
Reply-To: hans@duttnph.UUCP (Hans Buurman)
Organization: Delft University of Technology, The Netherlands
Lines: 67


Fons Rademakers posted a number of patches to run elm on an Apollo.
As it turns out, you'll need the one below on a Sun 4 (SunOs 3.2) too.
Does this mean it's also needed on other BSD systems ?


	Hans

Disclaimer: any opinions expressed above are my own.
-----------------------------------------------------------------------------
Hans Buurman                   | hans@duttnph.UUCP
Pattern Recognition Group      | mcvax!dutrun!duttnph!hans
Faculty of Applied Physics     | tel. 31 - (0) 15 - 78 46 94
Delft University of Technology |
the Netherlands                |
-----------------------------------------------------------------------------

#! /bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of shell archive."
# Contents:  patch
# Wrapped by hans@duttnphg on Sat Nov 19 12:03:36 1988
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'patch' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'patch'\"
else
echo shar: Extracting \"'patch'\" \(724 characters\)
sed "s/^X//" >'patch' <<'END_OF_FILE'
X*** curses.c.org	Thu Nov 17 14:15:26 1988
X--- curses.c	Thu Nov 17 14:45:32 1988
X***************
X*** 317,325
X  		return(-1);
X  
X  	if (row == _line) {
X! 	  if (col == _col)
X! 	    return(0);				/* already there! */
X! 
X  	  else if (abs(col - _col) < 5) {	/* within 5 spaces... */
X  	    if (col > _col)
X  	      CursorRight(col - _col);
X
X--- 317,328 -----
X  		return(-1);
X  
X  	if (row == _line) {
X! 	  if (col == _col) {
X! 	  	  stuff = tgoto(_moveto, col, row);  /* force a moveto anyway (rdm) */
X! 		  tputs(stuff, 1, outchar);
X! 		  fflush(stdout);
X! 		  return(0);				/* already there! */
X!         }
X  	  else if (abs(col - _col) < 5) {	/* within 5 spaces... */
X  	    if (col > _col)
X  	      CursorRight(col - _col);
END_OF_FILE
if test 724 -ne `wc -c <'patch'`; then
    echo shar: \"'patch'\" unpacked with wrong size!
fi
# end of 'patch'
fi
echo shar: End of shell archive.
exit 0