From: mark@alsvid.une.edu.au (Mark Garrett Internet: mark@arvak.une.edu.au Phone: +61 66 20 3859)
Newsgroups: comp.mail.elm
Subject: Re: how to use `ispell' with elm?
Date: 23 Jul 92 11:42:50 GMT
Organization: University of New England - Northern Rivers (Lismore)

From article <stillson.711827803@tsfsrv>, by stillson@mitre.org (Ken Stillson):
> Well, I've already posted this (unofficial, unsupported, un-everything
> else) patch several times, but what the heck-- here it comes again...
> 
> This will add the option I)spell on the "what now?" menu that comes up
> right after you've finished editing your message.  Use the unix patch
> command to effect the changes...

Hi Ken and other netters,

	I have been using you ispell patch for quite a while (since
you last posted it I guess). I found that I had to make changes as follows

  case 'i': need_redraw = 1;                         /* KEN */
-                 { int oldraw = RawState();
-                         sprintf (kens_temp, "ispell %s", filename); /* KEN */
-                         system_call (kens_temp, SH, TRUE, FALSE); /* KEN */
-                         if (oldraw == ON) {
-                                 Raw(OFF);
-                                 Raw(ON);
-                         }
-                 }

The new bit is the if (oldraw == ON). It seemed that it was loosing raw
mode operation on our ultrix4.2

Here is a diff against the elm2.4d"@(#)$Id: mailmsg2.c,v 4.11 91/02/28 20:12:37 syd Exp

:------------------------------------------------------------------------------:
*** mailmsg2.c	Sun Jul  5 17:43:27 1992
--- mailmsg2.c-DIST	Sun Jul  5 16:33:02 1992
***************
*** 125,131 ****
  	char *whole_msg_file, *tempnam();
  	char filename[SLEN], fname[SLEN], copy_file[SLEN],
               very_long_buffer[VERY_LONG_STRING], mailerflags[NLEN];
- 	char kens_temp[100];					/* KEN */
  	int ch, sys_status;
  	register int retransmit = FALSE; 
  	int      already_has_text = FALSE;		/* we need an ADDRESS */
--- 125,130 ----
***************
*** 248,267 ****
  			}
  			break;
  
- /* added 11/14/91 by KEN Stillson, support for spelling check: */
-               case 'i': need_redraw = 1;                         /* KEN */
-                 { int oldraw = RawState();
-                         sprintf (kens_temp, "ispell %s", filename); /* KEN */
-                         system_call (kens_temp, SH, TRUE, FALSE); /* KEN */
-                         if (oldraw == ON) {
-                                 Raw(OFF);
-                                 Raw(ON);
-                         }
-                 }
-                         break;                                   /* KEN */
- 
- 
- 
  	      case 'c': if (name_copy_file(copy_file))
  			  need_redraw = 1;
  			break;
--- 247,252 ----
***************
*** 596,604 ****
  #ifdef ALLOW_SUBSHELL
  	    strcat(buffer, "!)shell, ");
  #endif
!             strcat(buffer, "h)eaders, c)opy file, i)spell, s)end, f)orget.");
! /* KEN */
!   
  	    Centerline(LINES-1, buffer);
  	  }
  
--- 581,587 ----
  #ifdef ALLOW_SUBSHELL
  	    strcat(buffer, "!)shell, ");
  #endif
! 	    strcat(buffer, "h)eaders, c)opy file, s)end, or f)orget.");
  	    Centerline(LINES-1, buffer);
  	  }
  
***************
*** 677,687 ****
  		            continue;
  	                 }
  			 break;
- 
- 
-    	     case 'i'  : Write_to_screen("Ispell",0);            /* KEN */
-                          break;
- 
  
  	     case 'h'  : Write_to_screen("Headers",0);
  			 break;
--- 660,665 ----


	Thanks for your patches, Ken
		I have found them most useful

		Cheers
			Mark :)
-- 
Mark Garrett	Internet:  mark@arvak.une.edu.au	Phone: 	+61 66 20 3859
   University of New England, Northern Rivers, Lismore NSW Australia.
Newsgroups: comp.mail.elm