--- a/HistoryManager.st	Thu Feb 19 16:54:00 2015 +0100
+++ b/HistoryManager.st	Thu Feb 19 21:39:26 2015 +0100
@@ -12,6 +12,8 @@
 "
 "{ Package: 'stx:libbasic3' }"
 
+"{ NameSpace: Smalltalk }"
+
 Object subclass:#HistoryManager
 	instanceVariableNames:'historyMode fullHistoryUpdate'
 	classVariableNames:'TheOneAndOnlyInstance EnforcedUserName'
@@ -369,7 +371,7 @@
 !HistoryManager class methodsFor:'others'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.84 2014-02-05 17:52:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.85 2015-02-19 20:39:26 cg Exp $'
 ! !
 
 !HistoryManager methodsFor:'accessing'!
@@ -1022,7 +1024,7 @@
 !
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.84 2014-02-05 17:52:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/HistoryManager.st,v 1.85 2015-02-19 20:39:26 cg Exp $'
 ! !
 
 !HistoryManager::HistoryLine class methodsFor:'filtering'!
@@ -1176,7 +1178,7 @@
 
     inst := self basicNew.  
 
-    array := aString asArrayOfSubstrings.
+    array := aString asCollectionOfWords.
     array size < 5 ifTrue:[^ nil].
 
     array := array collect:[:word | word withoutSpaces].
@@ -1718,7 +1720,7 @@
 !HistoryManager class methodsFor:'documentation'!
 
 version_SVN
-    ^ '$Id: HistoryManager.st,v 1.84 2014-02-05 17:52:27 cg Exp $'
+    ^ '$Id: HistoryManager.st,v 1.85 2015-02-19 20:39:26 cg Exp $'
 ! !