--- a/Array.st	Mon Mar 17 08:43:59 2014 +0100
+++ b/Array.st	Mon Mar 17 22:20:26 2014 +0100
@@ -1830,13 +1830,13 @@
 
 refersToLiteral:aLiteral
     "return true if the receiver or recursively any array element in the
-     receiver referes to aLiteral (i.e. a deep search)"
+     receiver refers to aLiteral (i.e. a deep search)"
 
     self do: [ :el |
-	el == aLiteral ifTrue:[^true].
-	el class == Array ifTrue:[
-	    (el refersToLiteral: aLiteral) ifTrue: [^true]
-	]
+        el == aLiteral ifTrue:[^true].
+        el class == Array ifTrue:[
+            (el refersToLiteral: aLiteral) ifTrue: [^true]
+        ]
     ].
     ^ false
 
@@ -2612,10 +2612,10 @@
 !Array class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.161 2013-12-05 11:34:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.162 2014-03-17 21:20:26 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.161 2013-12-05 11:34:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Array.st,v 1.162 2014-03-17 21:20:26 cg Exp $'
 ! !