--- a/NewInspectorPanelView.st	Tue Mar 27 17:39:21 2007 +0200
+++ b/NewInspectorPanelView.st	Mon Apr 02 13:46:42 2007 +0200
@@ -9,8 +9,7 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
+"{ Package: 'stx:libtool2' }"
 
 "{ NameSpace: NewInspector }"
 
@@ -322,7 +321,7 @@
     "
     |sqNr view|
 
-    view := (WindowGroup lastEventQuerySignal raise) view.
+    view := (WindowGroup lastEventQuerySignal query) view.
     sqNr := labelViews findFirst:[:v| v == view].
 
     sqNr ~~ 0 ifTrue:[
@@ -493,7 +492,7 @@
     "
     |sqNr view|
 
-    view := (WindowGroup lastEventQuerySignal raise) view.
+    view := (WindowGroup lastEventQuerySignal query) view.
     sqNr := listViews findFirst:[:v| v == view].
 
     sqNr notNil ifTrue:[^ self viewMenu:sqNr]