--- a/NewInspectorPanelView.st	Fri Oct 10 20:12:52 1997 +0200
+++ b/NewInspectorPanelView.st	Fri Oct 10 20:59:33 1997 +0200
@@ -473,7 +473,7 @@
 viewMenu:anIndex
     "popup menu required for a view identified by its sequence number
     "
-    |view menu inst args lbls txt|
+    |view menu inst args lbls|
 
     view := listViews at:anIndex.
     view hasSelection ifFalse:[^ nil].
@@ -693,7 +693,7 @@
 moveContentsLeft:nTimes
     "move the contents of all views one position left
     "
-    |fView stop assoc inspObj pView index|
+    |fView stop pView index|
 
     (nTimes < 1 or:[listViews last isEmpty]) ifTrue:[
         ^ self
@@ -729,7 +729,7 @@
 moveContentsRight:nTimes
     "move the contents of all views one position right
     "
-    |view assoc size index lView fView|
+    |size index lView fView|
 
     size := leftHistory size.