--- a/Method.st	Mon Sep 05 23:18:04 2011 +0200
+++ b/Method.st	Mon Sep 05 23:18:49 2011 +0200
@@ -323,6 +323,13 @@
     "Created: 9.2.1996 / 19:05:28 / cg"
 ! !
 
+!Method methodsFor:'Compatibility-Squeak'!
+
+pragmas
+    ^ self annotations
+
+    "Created: / 05-09-2011 / 23:12:24 / cg"
+! !
 
 !Method methodsFor:'Compatibility-VW'!
 
@@ -3531,11 +3538,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.365 2011-09-05 08:14:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.366 2011-09-05 21:18:49 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.365 2011-09-05 08:14:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.366 2011-09-05 21:18:49 cg Exp $'
 !
 
 version_SVN