Thanks for helping! * alpheccar <[email protected]> [2009-01-06 19:47:21+0100] > Roman, > > Here is the source code to do what you want: > > import Graphics.PDF > import Complex > > main = runPdf "bug.pdf" standardDocInfo (PDFRect 0 0 100 100) pdf > where > pdf = do > p <- addPage Nothing > drawWithPage p $ do > moveto $ 10 :+ 10 > sequence $ replicate 10 $ drawText $ text (PDFFont Helvetica > 10) 0 0 (toPDFString "ABC") > > > It is the Text monad that needs to be replicated. Each copy will start > drawing the text lines at (10,10) as specified by the moveto. > But, inside the text monad, each "text" will create a new line. > > Thanks, > Christophe. > > >> Here is a program which illustrates an unexpected behaviour: >> >> import Graphics.PDF >> >> main = runPdf "bug.pdf" standardDocInfo (PDFRect 0 0 100 100) pdf >> where >> pdf = do >> p <- addPage Nothing >> drawWithPage p $ drawText $ >> sequence $ replicate 10 $ >> text (PDFFont Helvetica 10) 10 10 (toPDFString "ABC") >> >> What I expect here is "ABC" printed 10 times on the same place >> (starting >> at (10,10)). What I see (in Okular) is ABC printed each time in the new >> place like this: >> >> ABC >> ABC >> ABC >> ABC >> >> What's happening here? I'm using HPDF-1.4.1 from Hackage. >> >> -- >> Roman I. Cheplyaka :: http://ro-che.info/ >> "Don't let school get in the way of your education." - Mark Twain >
-- Roman I. Cheplyaka :: http://ro-che.info/ "Don't let school get in the way of your education." - Mark Twain _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
