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.
when loading an existing class from the repository,
authorClaus Gittinger <cg@exept.de>
Thu, 18 Jun 1998 14:32:50 +0200
changeset 1698 4fcf69e3d3c1
parent 1697 a63ff4e95e36
child 1699 6e0506ef6608
when loading an existing class from the repository, use the existing classes nameSpace as nameSpace.
BrowserView.st file | annotate | diff | comparison | revisions
BrwsrView.st file | annotate | diff | comparison | revisions 
--- a/BrowserView.st	Thu Jun 18 11:27:54 1998 +0200
+++ b/BrowserView.st	Thu Jun 18 14:32:50 1998 +0200
@@ -4083,14 +4083,17 @@
                     prevSkip := ClassCategoryReader skipUnchangedMethods.
                     ClassCategoryReader skipUnchangedMethods:false.
 
-                    Class packageQuerySignal answer:currentClass package
+                    Class nameSpaceQuerySignal answer:currentClass nameSpace
                     do:[
-                        lockUpdates := true.
-                        [
-                            aStream fileIn.
-                        ] valueNowOrOnUnwindDo:[
-                            ClassCategoryReader skipUnchangedMethods:prevSkip.
-                            lockUpdates := false.
+                        Class packageQuerySignal answer:currentClass package
+                        do:[
+                            lockUpdates := true.
+                            [
+                                aStream fileIn.
+                            ] valueNowOrOnUnwindDo:[
+                                ClassCategoryReader skipUnchangedMethods:prevSkip.
+                                lockUpdates := false.
+                            ].
                         ].
                     ].
 
@@ -4132,7 +4135,7 @@
     ]
 
     "Created: / 14.11.1995 / 16:43:15 / cg"
-    "Modified: / 20.5.1998 / 19:44:27 / cg"
+    "Modified: / 18.6.1998 / 14:29:40 / cg"
 !
 
 classModifyContainer
@@ -11715,6 +11718,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.418 1998-06-18 07:32:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.419 1998-06-18 12:32:50 cg Exp $'
 ! !
 BrowserView initialize!
--- a/BrwsrView.st	Thu Jun 18 11:27:54 1998 +0200
+++ b/BrwsrView.st	Thu Jun 18 14:32:50 1998 +0200
@@ -4083,14 +4083,17 @@
                     prevSkip := ClassCategoryReader skipUnchangedMethods.
                     ClassCategoryReader skipUnchangedMethods:false.
 
-                    Class packageQuerySignal answer:currentClass package
+                    Class nameSpaceQuerySignal answer:currentClass nameSpace
                     do:[
-                        lockUpdates := true.
-                        [
-                            aStream fileIn.
-                        ] valueNowOrOnUnwindDo:[
-                            ClassCategoryReader skipUnchangedMethods:prevSkip.
-                            lockUpdates := false.
+                        Class packageQuerySignal answer:currentClass package
+                        do:[
+                            lockUpdates := true.
+                            [
+                                aStream fileIn.
+                            ] valueNowOrOnUnwindDo:[
+                                ClassCategoryReader skipUnchangedMethods:prevSkip.
+                                lockUpdates := false.
+                            ].
                         ].
                     ].
 
@@ -4132,7 +4135,7 @@
     ]
 
     "Created: / 14.11.1995 / 16:43:15 / cg"
-    "Modified: / 20.5.1998 / 19:44:27 / cg"
+    "Modified: / 18.6.1998 / 14:29:40 / cg"
 !
 
 classModifyContainer
@@ -11715,6 +11718,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.418 1998-06-18 07:32:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.419 1998-06-18 12:32:50 cg Exp $'
 ! !
 BrowserView initialize!
hg/stx-libtool