--- a/ProjectView.st	Fri Apr 26 17:50:37 1996 +0200
+++ b/ProjectView.st	Sat Apr 27 19:55:36 1996 +0200
@@ -484,8 +484,8 @@
 
     (self confirm:(resources
                         string:'About to remove %1 classes and %2 additional methods.\\Are you certain you want this ?'
-                        with:classesToRemove size printString
-                        with:methodsToRemove size printString) withCRs)
+                        with:classesToRemove size
+                        with:methodsToRemove size) withCRs)
         ifTrue:[
             classesToRemove do:[:aClass |
                 ('PROJECT: removing ' , aClass name) infoPrintNL.
@@ -611,5 +611,5 @@
 !ProjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ProjectView.st,v 1.28 1996-04-26 15:50:37 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ProjectView.st,v 1.29 1996-04-27 17:55:36 cg Exp $'
 ! !