Mercurial Mercurial > hg > stx-libwidg2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
checkin from browser
authorClaus Gittinger <cg@exept.de>
Wed, 20 Jan 1999 20:26:17 +0100
changeset 1184 58e399d8c312
parent 1183 667132091c2f
child 1185 fb57fb2ebee8
checkin from browser
ImageEditView.st file | annotate | diff | comparison | revisions
ImgEditV.st file | annotate | diff | comparison | revisions 
--- a/ImageEditView.st	Wed Jan 20 20:24:00 1999 +0100
+++ b/ImageEditView.st	Wed Jan 20 20:26:17 1999 +0100
@@ -1308,12 +1308,12 @@
 loadFromClass
 
     ^self loadFromMessage: 
-	(ResourceSelectionBrowser
-	    request: 'Load Image From Class'
-	    onSuperclass: nil
-	    andClass: self resourceClass
-	    andSelector: self resourceSelector
-	    withResourceTypes: #(image fileImage))
+        (ResourceSelectionBrowser
+            request: 'Load Image From Class'
+            onSuperclass: nil
+            andClass: self resourceClass
+            andSelector: self resourceSelector
+            withResourceTypes: #(image fileImage programImage))
             
 
 !
@@ -1622,5 +1622,5 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.108 1999-01-08 21:34:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ImageEditView.st,v 1.109 1999-01-20 19:26:17 cg Exp $'
 ! !
--- a/ImgEditV.st	Wed Jan 20 20:24:00 1999 +0100
+++ b/ImgEditV.st	Wed Jan 20 20:26:17 1999 +0100
@@ -1308,12 +1308,12 @@
 loadFromClass
 
     ^self loadFromMessage: 
-	(ResourceSelectionBrowser
-	    request: 'Load Image From Class'
-	    onSuperclass: nil
-	    andClass: self resourceClass
-	    andSelector: self resourceSelector
-	    withResourceTypes: #(image fileImage))
+        (ResourceSelectionBrowser
+            request: 'Load Image From Class'
+            onSuperclass: nil
+            andClass: self resourceClass
+            andSelector: self resourceSelector
+            withResourceTypes: #(image fileImage programImage))
             
 
 !
@@ -1622,5 +1622,5 @@
 !ImageEditView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/ImgEditV.st,v 1.108 1999-01-08 21:34:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Attic/ImgEditV.st,v 1.109 1999-01-20 19:26:17 cg Exp $'
 ! !
hg/stx-libwidg2