Question

It seems the following two lines of code are breaking the syntax coloring in TCL.

regsub -all {/} $original {\\\\} target      # The last } is being escaped

set grep_keyword [string trim $grep_keyword {"}]   # The " character is starting a new quote

This code was like this when I opened the files. Is there a way to fix this?

Answer 1

So, I came back to this and put some effort into solving my problem. I altered the tmLangauge file for TCL. The } character is recognized as the ending brace. I just added \} to this definition as well.

<key>braces</key>
<dict>
    <key>begin</key>
    <string>(?:^|(?&lt;=\s))\{</string>
    <key>comment</key>
    <string>matches a single brace-enclosed word</string>
    <key>end</key>
    <string>\}([^\s\]]*)</string>
    <key>endCaptures</key>
    <dict>
        <key>1</key>
        <dict>
            <key>name</key>
            <string>invalid.illegal.tcl</string>
        </dict>
    </dict>
    <key>patterns</key>
    <array>
        <dict>
            <key>match</key>
            <string>\\[{}\n]</string>
            <key>name</key>
            <string>constant.character.escape.tcl</string>
        </dict>
        <dict>
            <key>include</key>
            <string>#inner-braces</string>
        </dict>
    </array>
</dict>

In the above, I made a modification to the RegEx to look like so:

<string>\}([^\s\]]*)|\\}\s</string>