--- a/ObjectView.st Mon Oct 31 14:45:42 2016 +0100
+++ b/ObjectView.st Wed Nov 02 14:49:15 2016 +0100
@@ -1663,8 +1663,11 @@
self withWaitCursorDo:[
|xp yp y x|
- ((bigStepH isInteger and:[littleStepH isNil or:[littleStepH isInteger]])
- and:[(bigStepV isInteger and:[littleStepV isNil or:[littleStepV isInteger]])]) ifTrue:[
+ (bigStepH isInteger
+ and:[ (littleStepH isNil or:[littleStepH isInteger])
+ and:[ bigStepV isInteger
+ and:[ littleStepV isNil or:[littleStepV isInteger]]]]
+ ) ifTrue:[
gridW := bigStepH.
littleStepH notNil ifTrue:[gridW := gridW max:littleStepH].
gridH := bigStepV.