diff -r 000000000000 -r de9c2efb9d02 QScintilla/Lexers/LexerTCL.py
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/QScintilla/Lexers/LexerTCL.py Mon Dec 28 16:03:33 2009 +0000
@@ -0,0 +1,54 @@
+# -*- coding: utf-8 -*-
+
+# Copyright (c) 2008 - 2009 Detlev Offenbach <detlev@die-offenbachs.de>
+#
+
+"""
+Module implementing a TCL/Tk lexer with some additional methods.
+"""
+
+from PyQt4.Qsci import QsciLexerTCL
+
+from Lexer import Lexer
+
+import Preferences
+
+class LexerTCL(QsciLexerTCL, Lexer):
+ """
+ Subclass to implement some additional lexer dependant methods.
+ """
+ def __init__(self, parent=None):
+ """
+ Constructor
+
+ @param parent parent widget of this lexer
+ """
+ QsciLexerTCL.__init__(self, parent)
+ Lexer.__init__(self)
+
+ self.commentString = "#"
+
+ def initProperties(self):
+ """
+ Public slot to initialize the properties.
+ """
+ self.setFoldCompact(Preferences.getEditor("AllFoldCompact"))
+
+ def isCommentStyle(self, style):
+ """
+ Public method to check, if a style is a comment style.
+
+ @return flag indicating a comment style (boolean)
+ """
+ return style in [QsciLexerTCL.Comment,
+ QsciLexerTCL.CommentBlock,
+ QsciLexerTCL.CommentBox,
+ QsciLexerTCL.CommentLine]
+
+ def isStringStyle(self, style):
+ """
+ Public method to check, if a style is a string style.
+
+ @return flag indicating a string style (boolean)
+ """
+ return style in [QsciLexerTCL.QuotedString]
