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.
again
authorClaus Gittinger <cg@exept.de>
Thu, 11 Apr 1996 15:50:59 +0200
changeset 466 94599cd79e2d
parent 465 42f0224ab165
child 467 b07279f33723
again
BrowserView.st file | annotate | diff | comparison | revisions
BrwsrView.st file | annotate | diff | comparison | revisions 
--- a/BrowserView.st	Thu Apr 11 15:47:18 1996 +0200
+++ b/BrowserView.st	Thu Apr 11 15:50:59 1996 +0200
@@ -838,8 +838,9 @@
         logMessage notNil ifTrue:[
             Smalltalk allClassesInCategory:currentClassCategory do:[:aClass |
                 self busyLabel:'checking in %1' with:aClass name.
+                "/ ca does not want boxes to pop up all over ...
                 InformationSignal handle:[:ex |
-                   Transcript showCr:ex parameter
+                    Transcript showCr:ex errorString
                 ] do:[
                     (aClass sourceCodeManager) 
                         checkinClass:aClass 
@@ -852,7 +853,7 @@
     ]
 
     "Created: 23.11.1995 / 11:41:38 / cg"
-    "Modified: 11.4.1996 / 15:43:09 / cg"
+    "Modified: 11.4.1996 / 15:49:34 / cg"
 !
 
 classCategoryRepositoryHistory
@@ -6979,6 +6980,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.120 1996-04-11 13:47:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.121 1996-04-11 13:50:59 cg Exp $'
 ! !
 BrowserView initialize!
--- a/BrwsrView.st	Thu Apr 11 15:47:18 1996 +0200
+++ b/BrwsrView.st	Thu Apr 11 15:50:59 1996 +0200
@@ -838,8 +838,9 @@
         logMessage notNil ifTrue:[
             Smalltalk allClassesInCategory:currentClassCategory do:[:aClass |
                 self busyLabel:'checking in %1' with:aClass name.
+                "/ ca does not want boxes to pop up all over ...
                 InformationSignal handle:[:ex |
-                   Transcript showCr:ex parameter
+                    Transcript showCr:ex errorString
                 ] do:[
                     (aClass sourceCodeManager) 
                         checkinClass:aClass 
@@ -852,7 +853,7 @@
     ]
 
     "Created: 23.11.1995 / 11:41:38 / cg"
-    "Modified: 11.4.1996 / 15:43:09 / cg"
+    "Modified: 11.4.1996 / 15:49:34 / cg"
 !
 
 classCategoryRepositoryHistory
@@ -6979,6 +6980,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.120 1996-04-11 13:47:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.121 1996-04-11 13:50:59 cg Exp $'
 ! !
 BrowserView initialize!
hg/stx-libtool