--- a/InspectorPanelView.st Fri Oct 10 20:12:52 1997 +0200
+++ b/InspectorPanelView.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.