Permalink
Browse files

Remove (do ..) block

It's a single statement and isn't required
  • Loading branch information...
1 parent e446b26 commit b7432051c5b59ef7229c960a0ed3c1ec3e538ea6 @KushalP committed May 3, 2012
Showing with 1 addition and 2 deletions.
  1. +1 −2 src/camelot/core.clj
View
@@ -46,8 +46,7 @@
[doc page page-size lines]
(let [start-x 35
start-y (- (.getUpperRightY page-size) 75)]
- (do
- (.addPage doc page))
+ (.addPage doc page)
(with-open [content (PDPageContentStream. doc page)]
(loop [lines lines
start-y start-y]

0 comments on commit b743205

Please sign in to comment.