--- a/AspectAdaptor.st	Fri Mar 25 17:05:54 2016 +0100
+++ b/AspectAdaptor.st	Fri Mar 25 17:07:03 2016 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libview2' }"
 
+"{ NameSpace: Smalltalk }"
+
 ProtocolAdaptor subclass:#AspectAdaptor
 	instanceVariableNames:'myAspect getMsg putMsg'
 	classVariableNames:''
@@ -175,7 +177,7 @@
 !AspectAdaptor methodsFor:'accessing-spec'!
 
 accessWith:getSelector assignWith:putSelector
-    "setup the recevier to use getSelector to fetch a value
+    "setup the receiver to use getSelector to fetch a value
      and putSelector to change it."
 
     getMsg := getSelector.
@@ -185,7 +187,7 @@
 !
 
 accessWith:getSelector assignWith:putSelector aspect:aspectSymbol
-    "setup the recevier to use getSelector to fetch a value
+    "setup the receiver to use getSelector to fetch a value
      and putSelector to change it."
 
     getMsg := getSelector.
@@ -299,6 +301,6 @@
 !AspectAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AspectAdaptor.st,v 1.24 2014-03-05 21:57:24 cg Exp $'
+    ^ '$Header$'
 ! !