Changeset 17720 for ext

Show
Ignore:
Timestamp:
09/07/07 18:26:02 (16 months ago)
Author:
moritz
Message:

Kwid::Event::Parser: removed obsolete unless...else

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • ext/Kwid-Event-Parser/lib/Kwid/Event/Parser.pm

    r12776 r17720  
    120120        given $token { 
    121121            when rx:P5/([\*\/\`])/ { #` 
    122                 if ($in_code && $token ne '`') { 
     122                if (!($in_code && $token ne '`')) { 
    123123                    %events<string>($token);                     
    124124                } 
    125125                else { 
    126126                    # if the stack is empty then ... 
    127                     unless (@modifier_stack) { 
     127                    if (!@modifier_stack) { 
    128128                        # push the latest modifier on to it ... 
    129129                        @modifier_stack.push($token);