[Haskell-cafe] Pretty-printing peg solitaire boards

[Maurí­cio]

Hi,

I'm trying to pretty-print (with Text
. PrettyPrint . HughesPJ) a set of peg solitaire
boards. No matter what I try, I always get this:

   00#
   00#
0000#00
0000000
0000000
   000
   000   :   00#
             00#
           0000000
           0000000
           0000000
             000
             000

but what I really want is this:

   00#       00#
   00#       00#
0000#00   0000000
0000000 : 0000000
0000000     000
   000       000
   000       000

What I'm I doing wrong? When I have two boards
a,b::Doc, I'm composing them with

a <+> colon <+> b

and rendering them with just 'render'. Should I
try something else?

Thanks,
Maurício