[21] in bug-owl
@( ... ) patch
daemon@ATHENA.MIT.EDU (Jeremy Daniel)
Mon Jun 24 14:09:47 2002
To: bug-ktools@MIT.EDU
From: Jeremy Daniel <jdaniel@MIT.EDU>
Date: 18 Jun 2002 17:30:48 -0400
Message-ID: <skesn3ke0l3.fsf@multics.mit.edu>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Resent-To: bug-owl-mtg@spatula-city.mit.edu
Resent-From: "James M. Kretchmar" <kretch@MIT.EDU>
Here's what I meant to send before in case you can't find it. I also
referenced /mit/jdaniel/project/owl/perl/protect.pl to wrap close
brackets where necessary. It might be better to write something in C,
but I'm not sure if it would then be callable from perl where you'd
need to use it in owl::format(). The subroutine owl::protect()
probably wants a little modification depending on which things owl
interprets and how if it does anything with ones it doesn't.
*** /mit/ktools/src/owl/src/fmtext.c Thu Jun 6 10:38:07 2002
--- fmtext.c Tue Jun 18 17:27:31 2002
***************
*** 147,150 ****
--- 147,161 ----
owl_free(buff);
continue;
+ } else if (!strcmp(buff, "@")) {
+ /* deal with things like @< ... > used to protect the enclosed
+ braces and keep them from closing things they shouldn't and
+ to isolate a color change */
+ attrstack[stacksize]=OWL_FMTEXT_ATTR_NONE;
+ chrstack[stacksize]=tmpptr[0];
+ stacksize++;
+ curattrs|=OWL_FMTEXT_ATTR_NONE;
+ txtptr+=2;
+ owl_free(buff);
+ continue;
} else {
--
Jer
------------------------------------------------------------------
Tulgey Wood - tulgeywood@attbi.com Cell Phone: 617-429-8573 /
4 Farragut Ave (617-629-3983) jdaniel-phone@mit.edu
Somerville, MA 02144-1709 AIM: jdanielmit
Zephyr athena users over the web: http://webzephyr.mit.edu/
