equal
deleted
inserted
replaced
145 ! ! |
145 ! ! |
146 |
146 |
147 !TextCollector class methodsFor:'debugging'! |
147 !TextCollector class methodsFor:'debugging'! |
148 |
148 |
149 debugSendersOfMessagePattern:aGLOBMatchPattern |
149 debugSendersOfMessagePattern:aGLOBMatchPattern |
150 "ever want to know, who sends a particular message to the transcript ? |
150 "ever want to know, who sends a particular text-message to the transcript ? |
151 Call this with a match string and get a halt, when the message is next sent" |
151 Call this with a match string and get a halt, when the text appears is sent next " |
152 |
152 |
153 DebugSendersOfMessagePattern := aGLOBMatchPattern |
153 DebugSendersOfMessagePattern := aGLOBMatchPattern |
154 |
154 |
155 " |
155 " |
156 self debugSendersOfMessagePattern:'no such*' |
156 self debugSendersOfMessagePattern:'no such*' |
|
157 self debugSendersOfMessagePattern:'remove*' |
157 self debugSendersOfMessagePattern:nil. |
158 self debugSendersOfMessagePattern:nil. |
158 " |
159 " |
|
160 |
|
161 "Modified: / 04-04-2011 / 15:37:39 / cg" |
159 ! ! |
162 ! ! |
160 |
163 |
161 !TextCollector class methodsFor:'defaults'! |
164 !TextCollector class methodsFor:'defaults'! |
162 |
165 |
163 defaultCollectSize |
166 defaultCollectSize |
893 ! ! |
896 ! ! |
894 |
897 |
895 !TextCollector class methodsFor:'documentation'! |
898 !TextCollector class methodsFor:'documentation'! |
896 |
899 |
897 version |
900 version |
898 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.104 2009-12-03 10:45:15 stefan Exp $' |
901 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.105 2011-04-04 13:38:56 cg Exp $' |
899 ! |
902 ! |
900 |
903 |
901 version_CVS |
904 version_CVS |
902 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.104 2009-12-03 10:45:15 stefan Exp $' |
905 ^ '$Header: /cvs/stx/stx/libwidg/TextCollector.st,v 1.105 2011-04-04 13:38:56 cg Exp $' |
903 ! ! |
906 ! ! |
904 |
907 |
905 TextCollector initialize! |
908 TextCollector initialize! |