--- a/PluginSupport.st	Fri Sep 07 13:46:06 2012 +0100
+++ b/PluginSupport.st	Fri Sep 07 17:24:32 2012 +0100
@@ -91,7 +91,7 @@
             view := applicationOrView window.
         ] ifFalse:[
             applicationOrView := anApplicationClass new.
-            (applicationOrView isKindOf:View) ifTrue:[
+            applicationOrView isView ifTrue:[
                 view := applicationOrView
             ] ifFalse:[
                 view := applicationOrView window.
@@ -192,9 +192,9 @@
 !PluginSupport class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libbasic/PluginSupport.st,v 1.15 2011/07/04 13:00:52 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libbasic/PluginSupport.st,v 1.16 2012/08/03 20:26:00 stefan Exp §'
 !
 
 version_SVN
-    ^ '$Id: PluginSupport.st 10700 2011-09-29 15:44:37Z vranyj1 $'
+    ^ '$Id: PluginSupport.st 10844 2012-09-07 16:24:32Z vranyj1 $'
 ! !