diff -r c88ab4386e61 -r 5e7b679c31ce TopView.st --- a/TopView.st Wed Jul 20 16:38:41 2016 +0200 +++ b/TopView.st Wed Jul 20 17:07:18 2016 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1995 by Claus Gittinger All Rights Reserved @@ -705,8 +707,7 @@ (similar to how mac windows and realplayer are moved). Return true here, if a window move should be initiated" - ^ self windowGroup isModal not - and:[ self topView isPopUpView ] + ^ self isModal not and:[self topView isPopUpView] "Created: / 03-03-2011 / 19:30:59 / cg" ! !