Properly handle single-line records

[Janiczek]

x address = button [ onClick address (AddStatus {id=50}) ] [ text "add status" ]

becomes

x address =
    button [ onClick address (AddStatus { id = 50) ] [ text "add status" ]
                                        }

[avh4]

Minimal case is

x address =
    (f {id=50})

This is because records that are single-line in the input are being formatted as multiline.

This problem will also apply to if statements, and maybe other things. The multiline logic should be redone to depend on the multiline-ness of the subexpression output instead of the input.

[avh4]

Fixed in 143238e