runX $ constA (request TableListRequest) >>> root [] [writeA] >>>
writeDocument [(a_indent,v_1)] "-"
writeDocument [(a_indent,v_1), (a_check_namespaces, v_1)] "-" should do the trick. Cheers, Tim _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
