Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

(fixes #30) fixed to not to draw out with global-padding top set 0

  • Loading branch information...
commit a3deaf12e5ed58a17df78d15443e1cc13fc25a88 1 parent e7f970c
@fukamachi authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/L5/slide.clj
View
2  src/L5/slide.clj
@@ -50,7 +50,7 @@
(case vertical
:bottom (- height (.height bounds) (:top padding))
:middle (- (/ height 2) (:top padding))
- 0)])
+ (.height bounds))])
(defn- build-str-shape
([#^Graphics2D g, strs, font, width] (build-str-shape g strs font width :left))
Please sign in to comment.
Something went wrong with that request. Please try again.