diff options
Diffstat (limited to 'src/interp/br-saturn.boot')
-rw-r--r-- | src/interp/br-saturn.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot index 3807efaa..106a2070 100644 --- a/src/interp/br-saturn.boot +++ b/src/interp/br-saturn.boot @@ -454,7 +454,7 @@ saturnTranText x == error nil isMenuItemStyle? s == - 15 = STRING_<('"\menuitemstyle{", s) => subString(s,15,(MAXINDEX s) - 15) + 15 = ('"\menuitemstyle{" < s) => subString(s,15,(MAXINDEX s) - 15) nil getCallBack callTail == @@ -1499,7 +1499,7 @@ unTab s == [unTab1 first s, :rest s] unTab1 s == - STRING_<('"\tab{", s) = 5 and (k := charPosition(char '_}, s, 4)) => + ('"\tab{" < s) = 5 and (k := charPosition(char '_}, s, 4)) => subString(s, k + 1) s |