--- a/SmallSenseCompletionWindow.st	Mon Jan 30 22:09:44 2012 +0000
+++ b/SmallSenseCompletionWindow.st	Mon Jan 30 22:38:04 2012 +0000
@@ -1,6 +1,6 @@
 "{ Package: 'stx:libtool/smallsense' }"
 
-SimpleDialog subclass:#SmallSenseWindow
+SimpleDialog subclass:#SmallSenseCompletionWindow
 	instanceVariableNames:'codeView result position textHolder selectionHolder
 		selectionUnambigous listHolder'
 	classVariableNames:''
@@ -9,7 +9,7 @@
 !
 
 
-!SmallSenseWindow class methodsFor:'interface opening'!
+!SmallSenseCompletionWindow class methodsFor:'interface opening'!
 
 openForView: codeView class: class
 
@@ -21,7 +21,7 @@
     "Modified: / 26-11-2011 / 19:07:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow class methodsFor:'interface specs'!
+!SmallSenseCompletionWindow class methodsFor:'interface specs'!
 
 windowSpec
     "This resource specification was automatically generated
@@ -31,9 +31,9 @@
      the UIPainter may not be able to read the specification."
 
     "
-     UIPainter new openOnClass:SmallSenseWindow andSelector:#windowSpec
-     SmallSenseWindow new openInterface:#windowSpec
-     SmallSenseWindow open
+     UIPainter new openOnClass:SmallSenseCompletionWindow andSelector:#windowSpec
+     SmallSenseCompletionWindow new openInterface:#windowSpec
+     SmallSenseCompletionWindow open
     "
 
     <resource: #canvas>
@@ -71,7 +71,7 @@
       )
 ! !
 
-!SmallSenseWindow methodsFor:'aspects'!
+!SmallSenseCompletionWindow methodsFor:'aspects'!
 
 listHolder
 
@@ -115,7 +115,7 @@
     "Modified: / 26-11-2011 / 17:25:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow methodsFor:'change & update'!
+!SmallSenseCompletionWindow methodsFor:'change & update'!
 
 updateList
 
@@ -149,7 +149,7 @@
     "Modified: / 26-11-2011 / 19:25:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow methodsFor:'events'!
+!SmallSenseCompletionWindow methodsFor:'events'!
 
 complete
     | selection text lineNo line |
@@ -172,7 +172,7 @@
 
 handlesKeyPress:key inView:aView
 
-    "/Transcript showCR: 'SmallSenseWindow handlesKeyPress: ' , key.
+    "/Transcript showCR: 'SmallSenseCompletionWindow handlesKeyPress: ' , key.
     key isCharacter ifTrue:[^true].
     ^#(BackSpace Return) includes: key
 
@@ -182,7 +182,7 @@
 
 keyPress:key x:x y:y view:aView
 
-    "/Transcript showCR: 'SmallSenseWindow keyPress: ' , key.
+    "/Transcript showCR: 'SmallSenseCompletionWindow keyPress: ' , key.
 
     key isCharacter ifTrue:[self keyPressCharacter: key x:x y:y. ^self].
     key == #BackSpace ifTrue:[self keyPressBackSpaceX:x y:y.^self].
@@ -224,7 +224,7 @@
     "Modified (format): / 26-11-2011 / 19:11:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow methodsFor:'hooks'!
+!SmallSenseCompletionWindow methodsFor:'hooks'!
 
 postBuildList: listView
 
@@ -249,7 +249,7 @@
     "Modified: / 02-06-2011 / 21:36:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow methodsFor:'initialization'!
+!SmallSenseCompletionWindow methodsFor:'initialization'!
 
 initializeForView: view class: class
 
@@ -283,7 +283,7 @@
     "Modified: / 27-11-2011 / 10:06:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow methodsFor:'interface opening'!
+!SmallSenseCompletionWindow methodsFor:'interface opening'!
 
 completeOrOpen
 
@@ -324,8 +324,8 @@
     "Created: / 04-04-2011 / 21:12:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!SmallSenseWindow class methodsFor:'documentation'!
+!SmallSenseCompletionWindow class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: SmallSenseCompletionWindow.st 7857 2012-01-30 22:09:44Z vranyj1 $'
+    ^ '$Id: SmallSenseCompletionWindow.st 7858 2012-01-30 22:38:04Z vranyj1 $'
 ! !