--- a/DeviceHandle.st	Thu Sep 01 23:27:10 2016 +0100
+++ b/DeviceHandle.st	Mon Aug 01 23:30:02 2016 +0100
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libview' }"
 
+"{ NameSpace: Smalltalk }"
+
 Object subclass:#DeviceHandle
 	instanceVariableNames:'device drawableId gcId'
 	classVariableNames:''
@@ -92,6 +94,6 @@
 !DeviceHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceHandle.st,v 1.16.2.1 2014-05-08 08:27:50 stefan Exp $'
+    ^ '$Header$'
 ! !