equal
deleted
inserted
replaced
102 "/ true, false and self are often found in both lists |
102 "/ true, false and self are often found in both lists |
103 (suggestions includes:sniplet) ifFalse:[ |
103 (suggestions includes:sniplet) ifFalse:[ |
104 suggestions isEmpty ifFalse:[ suggestions := suggestions copyWith: '-' ]. |
104 suggestions isEmpty ifFalse:[ suggestions := suggestions copyWith: '-' ]. |
105 suggestions := suggestions copyWith: ( '%1 %2' |
105 suggestions := suggestions copyWith: ( '%1 %2' |
106 bindWith:(sniplet asStringCollection first "contractTo:25") |
106 bindWith:(sniplet asStringCollection first "contractTo:25") |
107 with: ( ('("',abbrev,'" snippet)') colorizeAllWith:Color grey)). |
107 with: ( ('("',abbrev,'" snippet)') colorizeAllWith:Color gray)). |
108 indexOfSnippet := suggestions size. |
108 indexOfSnippet := suggestions size. |
109 |
109 |
110 "/ change below, when reversing the order in above code |
110 "/ change below, when reversing the order in above code |
111 "/ suggestionOffset := 2. |
111 "/ suggestionOffset := 2. |
112 ] |
112 ] |
234 ! ! |
234 ! ! |
235 |
235 |
236 !WorkspaceCompletionSupport class methodsFor:'documentation'! |
236 !WorkspaceCompletionSupport class methodsFor:'documentation'! |
237 |
237 |
238 version |
238 version |
239 ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.8 2014-06-01 11:05:56 cg Exp $' |
239 ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.9 2014-07-08 21:17:07 cg Exp $' |
240 ! |
240 ! |
241 |
241 |
242 version_CVS |
242 version_CVS |
243 ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.8 2014-06-01 11:05:56 cg Exp $' |
243 ^ '$Header: /cvs/stx/stx/libwidg/WorkspaceCompletionSupport.st,v 1.9 2014-07-08 21:17:07 cg Exp $' |
244 ! ! |
244 ! ! |
245 |
245 |