[prev in list] [next in list] [prev in thread] [next in thread] 

List:       mason
Subject:    [Mason] Re: Thanks and quick Mason 0.6 comment/question
From:       Jonathan Swartz swartz () transbay ! net
Date:       1999-07-26 21:08:05
[Download RAW message or body]

As Ken pointed out, here is a better patch:

diff -a -u -r1.21 -r1.21.2.2
--- Parser.pm   1999/07/15 23:15:56     1.21
+++ Parser.pm   1999/07/26 17:45:52     1.21.2.2
@@ -269,7 +269,7 @@
                #
                # Tag beginning with <%
                #
-               if (substr($text,$b,7) eq '<%perl>') {
+               if (lc(substr($text,$b,7)) eq '<%perl>') {
                    #
                    # <%perl> section
                    #

At 10:01 AM 7/26/99 -0700, Jonathan Swartz wrote:
>At 03:43 AM 7/26/99 -0600, you wrote:
>>First - Thank you for all the hard work on Mason!  We will shortly be
>>launching a mason based site (you can see the beta at http://www.c4.com)
>>and could not have created the site without Mason.
>>
>>Now a quicky about 0.6.  Is the change so that <%perl></%perl> works
>>whereas <%PERL></%PERL> throws an error intentional?  It throws a monkey
>>wrench in the masses of code we have that uses <%PERL></%PERL>
>>type constructs. {*grin*}
>>
>>Thanks again for all the hard work.
>>
>>----
>>djones@dljones.com          Daniel L. Jones            Direct: 970-522-0652
>> 
>
>Whoops, this is DEFINITELY a bug, introduced when I worked on the parser for 
>0.6. All section names should be case insensitive. Here's the patch, it
>will be included in 0.6.1.
>
>Jon
>
>diff -a -u -r1.21 -r1.21.2.1
>--- Parser.pm   1999/07/15 23:15:56     1.21
>+++ Parser.pm   1999/07/26 16:04:51     1.21.2.1
>@@ -269,7 +269,7 @@
>                #
>                # Tag beginning with <%
>                #
>-               if (substr($text,$b,7) eq '<%perl>') {
>+               if (substr($text,$b,7) =~ /<%perl>/i) {
>                    #
>                    # <%perl> section
>                    #
>
>
>
>======================================================================
>To unsubscribe: echo unsubscribe | mail mason-request@netizen.com.au
>Charter/FAQ/Archive: http://www.netizen.com.au/resources/lists/mason/
> 

======================================================================
To unsubscribe: echo unsubscribe | mail mason-request@netizen.com.au
Charter/FAQ/Archive: http://www.netizen.com.au/resources/lists/mason/

[prev in list] [next in list] [prev in thread] [next in thread]