<div dir="ltr"><div class="gmail_extra"><br><div class="gmail_quote">On Tue, Jul 8, 2014 at 6:52 PM, Cody Goodman <span dir="ltr"><<a href="mailto:codygman.consulting@gmail.com" target="_blank">codygman.consulting@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div id=":3fs" class="a3s" style="overflow:hidden">      textElems <- filterM (liftM $ ((==) "text" . (`attr` "type"))) inputs<br>
</div></blockquote></div><br>Are you sure this shouldn't be:</div><div class="gmail_extra"><br></div><div class="gmail_extra">    let textElems = filter ((==) "text" . `attr` "type") inputs</div><div class="gmail_extra">
<br></div><div class="gmail_extra">? The type in the error suggests this is more appropriate.<br clear="all"><div><br></div>-- <br><div dir="ltr"><div>brandon s allbery kf8nh                               sine nomine associates</div>
<div><a href="mailto:allbery.b@gmail.com" target="_blank">allbery.b@gmail.com</a>                                  <a href="mailto:ballbery@sinenomine.net" target="_blank">ballbery@sinenomine.net</a></div><div>unix, openafs, kerberos, infrastructure, xmonad        <a href="http://sinenomine.net" target="_blank">http://sinenomine.net</a></div>
</div>
</div></div>