home *** CD-ROM | disk | FTP | other *** search
- Path: sparky!uunet!munnari.oz.au!metro!grivel!alsvid!mark
- 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?
- Message-ID: <BruB7E.1u0@alsvid.une.edu.au>
- Date: 23 Jul 92 11:42:50 GMT
- References: <stillson.711827803@tsfsrv>
- Organization: University of New England - Northern Rivers (Lismore)
- Lines: 107
-
- 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.
-