# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 870084975 -7200
# Node ID ea4577f6cc4181c16e5de85ff771b2dbb0623d79
# Parent  d2d028799b019f36e3efe565dc39b4abd286cc9e
*** empty log message ***

diff -r d2d028799b01 -r ea4577f6cc41 UIObjectView.st
--- a/UIObjectView.st	Mon Jul 28 12:12:52 1997 +0200
+++ b/UIObjectView.st	Mon Jul 28 12:16:15 1997 +0200
@@ -859,7 +859,7 @@
 showUnselected:aComponent
     "show object unselected
     "
-    |wasClipped delta r|
+    |wasClipped r|
 
     selectionHiddenLevel ~~ 0 ifTrue:[^ self].
 
diff -r d2d028799b01 -r ea4577f6cc41 UISelectionPanel.st
--- a/UISelectionPanel.st	Mon Jul 28 12:12:52 1997 +0200
+++ b/UISelectionPanel.st	Mon Jul 28 12:16:15 1997 +0200
@@ -1174,7 +1174,7 @@
 raiseMenu
     "can open menu
     "
-    |spec menu value collection paste|
+    |spec menu value paste|
 
     spec := self clientSpec value.