Notepad++ doesn't recognize TCL comments

I have the same problem.
the latese 4.7 seems to be the same.
Now i edit Perl style and use it for TCL to get correct comment highlight.
Hope this problem can be fixed soon

Hello,

About TCL/TK, I have not found a way to solve this problem by using the syntax color feature, because, IMHO, all the cases are not currently written. So, I have created a user define language that recognize comments and subcommands correctly. But there is a little lack : when this user define language is applied on a tcl script, npp doesn't show the folding blocks...

If you are interested, look at this :

In order to active syntax color from a user define language, here is how you can do :

   1. open NotePad++
   2. start a new text document then copy the code below and paste it in the new document
   3. save it as c:\documents and settings\user\Application Data\Notepad++\userDefineLang.xml (please, note that the Aplication Data folder could be placed in another folder in the disk, depending of the os and the notapad++ install)
   4. then go to Settings > Preferences, and in "Hide" tab, hide the TCL language
   5. close notePad++ then open it
   6. open a tcl script and go to the Language menu and choose the "TCL" item after or before the "User Define" item

There is an another problem : I have noticed that Function list plug-in (1.2) doesn't show tcl procedures when this user define language is selected. But, Function List 2.0 alpha do it well
I wish this tip could help you.
A little feed back would be welcome.

code to copy :

<NotepadPlus>

    <UserLang name="TCL" ext="tcl">
        <Settings>
            <Global caseIgnored="no" />
            <TreatAsSymbol comment="no" commentLine="yes" />
            <Prefix words1="no" words2="no" words3="no" words4="yes" />
        </Settings>
        <KeywordLists>
            <Keywords name="Delimiters">"00"00</Keywords>
            <Keywords name="Folder+">{</Keywords>
            <Keywords name="Folder-">}</Keywords>
            <Keywords name="Operators">, ; ! . " ( ) [ ] { }</Keywords>
            <Keywords name="Comment">1 1 2 2 0#</Keywords>
            <Keywords name="Words1">after append array auto_execok auto_import auto_load auto_load_index auto_qualify beep binary break case catch cd clock close concat continue dde default echo else elseif encoding eof error eval exec exit expr fblocked fconfigure fcopy file fileevent flush for foreach format gets glob global history if incr info interp join lappend lindex linsert list llength load lrange lreplace lsearch lsort namespace open package pid pkg_mkIndex proc puts pwd read regexp regsub rename resource return scan seek set socket source split string subst switch tclLog tclMacPkgSearch tclPkgSetup tclPkgUnknown tell time trace unknown unset update uplevel upvar variable vwait while then bind pack focus menubutton frame pane separator notebook menu label combobox grid paned progressbar labelframe checkbutton radiobutton wm button destroy option bindtags update tk_messageBox tk_chooseColor tk_getOpenFile winfo mc style dom image</Keywords>
            <Keywords name="Words2">add configure cget insert -side -fill -padx -pady -ipadx -ipady -anchor -expand -weight -underline -text -image -padding -command -yscrollcommand -xscrollcommand forget exists isdirectory range require dirname script geometry iconify maxsize minsize overrideredirect resizable deiconify protocol title -message -font -foreground -sticky -row -column state -variable -id -title -initialdir -filetypes -defaultextension selectNodes -initialfile size columnconfigure -width -height -columns -stripebackground -editstartcommand -editendcommand cellconfigure -editable -editwindow createElement setAttribute appendChild setResultEncoding createDocument -encoding -nonewline getAttribute hasAttribute mkdir copy -orient -takefocus get index -cursor theme layout -relief -borderwidth -nocomplain -show -open join -type nodeValue documentElement parse -textvariable create -data -compound -style -value -state -class</Keywords>
            <Keywords name="Words3">eq ne == != < > <= >= false disabled true end yes no && || current left n ne nw both bottom top \n \"</Keywords>
            <Keywords name="Words4">$ \#</Keywords>
        </KeywordLists>
        <Styles>
            <WordsStyle name="DEFAULT" styleID="11" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="FOLDEROPEN" styleID="12" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="FOLDERCLOSE" styleID="13" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="KEYWORD1" styleID="5" fgColor="0000FF" bgColor="FFFFFF" fontName="" fontStyle="1" />
            <WordsStyle name="KEYWORD2" styleID="6" fgColor="008000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="KEYWORD3" styleID="7" fgColor="004080" bgColor="FFFFFF" fontName="" fontStyle="1" />
            <WordsStyle name="KEYWORD4" styleID="8" fgColor="800000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="COMMENT" styleID="1" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="COMMENT LINE" styleID="2" fgColor="808080" bgColor="FFFFFF" fontName="" fontStyle="2" />
            <WordsStyle name="NUMBER" styleID="4" fgColor="FF8000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="OPERATOR" styleID="10" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="1" />
            <WordsStyle name="DELIMINER1" styleID="14" fgColor="FF80FF" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="DELIMINER2" styleID="15" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
            <WordsStyle name="DELIMINER3" styleID="16" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" />
        </Styles>
    </UserLang>

</NotepadPlus>

end of code

--
Hugues Leonardi