author | Lorenzo Bettini <bettini@dsi.unifi.it> | 2012年11月09日 16:16:09 +0100 |
---|---|---|
committer | Lorenzo Bettini <bettini@dsi.unifi.it> | 2012年11月09日 16:16:09 +0100 |
commit | 1653167bb674e061d2133fbb229c84dea2b16ab3 (patch) | |
tree | d37a8ed8fd2e79868c3823ae49ca5f760f033903 /src | |
parent | e3139e6ef568704605aef1f71b6647dcb56d29a7 (diff) | |
download | src-highlite-1653167bb674e061d2133fbb229c84dea2b16ab3.tar.gz |
-rw-r--r-- | src/tcl.lang | 2 |
diff --git a/src/tcl.lang b/src/tcl.lang index d8ff5d5..dcddeea 100644 --- a/src/tcl.lang +++ b/src/tcl.lang @@ -30,6 +30,6 @@ keyword = "proc|global|upvar|if|then|else|elseif|for|foreach", "cd|clock|exec|exit|glob|pid|pwd|time", "dde|registry|resource" -vardef ID = '[[:word:]]+' +vardef ID = '[[:word:]:-]+' variable = "$" + $ID + "|${" + $ID + "}" |