Annotation.st
changeset 18751 be7fcd0a3f23
parent 18432 825c5dad53ac
child 18754 9bfce586253a
child 19820 18ad092be48d
--- a/Annotation.st	Fri Sep 11 10:49:16 2015 +0200
+++ b/Annotation.st	Wed Sep 16 14:49:07 2015 +0200
@@ -190,10 +190,8 @@
     "Created: / 16-07-2010 / 11:31:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-resource: type value: value
-
-    ^Annotation::Resource new 
-        type: type value: value
+resource:type values:value 
+    ^ Annotation::Resource new type:type value:value
 
     "Created: / 16-07-2010 / 11:31:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
@@ -576,7 +574,7 @@
         key := #'resource:'.
         arguments := Array with:typeArg.
     ] ifFalse:[
-        key := #'resource:value:'.
+        key := #'resource:values:'.
         arguments := Array with:typeArg with:valueArg.
     ].
 !
@@ -691,15 +689,15 @@
 !Annotation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.20 2015-06-05 16:07:38 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Annotation.st,v 1.20 2015-06-05 16:07:38 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: Annotation.st,v 1.20 2015-06-05 16:07:38 stefan Exp $'
+    ^ '$Id$'
 ! !