[xmonad] XMonad.Layout.Decoration patch with non-pure version of shrink