comments
authorClaus Gittinger <cg@exept.de>
Mon, 13 Mar 2006 12:38:21 +0100
changeset 2124 cd256d18f5cc
parent 2123 5247deafa7ef
child 2125 78bd48d8de76
comments
ResourceRetriever.st
--- a/ResourceRetriever.st	Wed Mar 08 16:48:28 2006 +0100
+++ b/ResourceRetriever.st	Mon Mar 13 12:38:21 2006 +0100
@@ -216,8 +216,8 @@
 !
 
 value
-    "returns the value assigned to resource or nil
-    "
+    "returns the value assigned to resource or nil"
+
     |resource|
 
     (resource := self resource value) isNil ifTrue:[
@@ -235,8 +235,8 @@
 !ResourceRetriever methodsFor:'accessing-resource'!
 
 findGuiResourcesIn:aResourceContainer
-    "setup a resource owner
-    "
+    "setup a resource owner"
+
     |ns cls|
 
     className isNil ifTrue:[
@@ -257,8 +257,8 @@
 !
 
 resource
-    "returns a form assigned to resource or nil
-    "
+    "returns a form assigned to resource or nil"
+
     |img cls|
 
     resource notNil ifTrue:[^ resource].
@@ -353,5 +353,5 @@
 !ResourceRetriever class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.11 2004-10-25 11:13:48 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceRetriever.st,v 1.12 2006-03-13 11:38:21 cg Exp $'
 ! !