Commits

Georg Brandl committed ce47f58

Fix showRat: confused denominator and numerator.

  • Participants
  • Parent commits 1373e8b

Comments (0)

Files changed (1)

File Text/CSS/CleverCSSUtil.hs

 -----------------------------------------------------------------------------------------
 -- |
 -- Module      :  Text.CSS.CleverCSSUtil
--- Copyright   :  (c) 2007-2010 Georg Brandl
+-- Copyright   :  (c) 2007-2011 Georg Brandl
 -- License     :  BSD (see the file LICENSE)
 --
 -- CleverCSS utilities.
 showRat :: Rational -> String
 showRat r | rest == 0 = show whole
           | otherwise = printf "%f" (fromRational r :: Double)
-  where (whole, rest) = (denominator r) `divMod` (numerator r)
+  where (whole, rest) = (numerator r) `divMod` (denominator r)