Mercurial Mercurial > hg > stx-libtool / 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.
specify the nameSpace into
authorClaus Gittinger <cg@exept.de>
Tue, 08 Oct 1996 19:04:17 +0200
changeset 748 777db65fa111
parent 747 a50e8643c666
child 749 27427c41b7ff
specify the nameSpace into which classes are binary-loaded.
FBrowser.st file | annotate | diff | comparison | revisions
FileBrowser.st file | annotate | diff | comparison | revisions 
--- a/FBrowser.st	Tue Oct 08 17:00:44 1996 +0200
+++ b/FBrowser.st	Tue Oct 08 19:04:17 1996 +0200
@@ -276,6 +276,7 @@
                     aStream := FileStream readonlyFileNamed:fileName in:currentDirectory.
                     aStream notNil ifTrue:[
                         bos := BinaryObjectStorage onOld:aStream.
+                        bos classEnvironment:Smalltalk.
                         bos next.
                         bos close
                     ]
@@ -309,7 +310,7 @@
         ]
     ]
 
-    "Modified: 24.6.1996 / 16:31:45 / cg"
+    "Modified: 8.10.1996 / 18:01:34 / cg"
 !
 
 fileGet
@@ -2651,5 +2652,5 @@
 !FileBrowser  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.96 1996-10-08 15:00:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/FBrowser.st,v 1.97 1996-10-08 17:04:17 cg Exp $'
 ! !
--- a/FileBrowser.st	Tue Oct 08 17:00:44 1996 +0200
+++ b/FileBrowser.st	Tue Oct 08 19:04:17 1996 +0200
@@ -276,6 +276,7 @@
                     aStream := FileStream readonlyFileNamed:fileName in:currentDirectory.
                     aStream notNil ifTrue:[
                         bos := BinaryObjectStorage onOld:aStream.
+                        bos classEnvironment:Smalltalk.
                         bos next.
                         bos close
                     ]
@@ -309,7 +310,7 @@
         ]
     ]
 
-    "Modified: 24.6.1996 / 16:31:45 / cg"
+    "Modified: 8.10.1996 / 18:01:34 / cg"
 !
 
 fileGet
@@ -2651,5 +2652,5 @@
 !FileBrowser  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.96 1996-10-08 15:00:44 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.97 1996-10-08 17:04:17 cg Exp $'
 ! !
hg/stx-libtool