<?xml version="1.0" encoding="UTF-8"?>
<commit>
  <added type="array"/>
  <modified type="array">
    <modified>
      <diff>@@ -92,7 +92,7 @@
     (assoc c :red (max (min (- (:red c) dr) 255) 0)
              :green (max (min (- (:green c) dg) 255) 0)
              :blue (max (min (- (:blue c) db) 255) 0)
-             :alpha (max (min (- (:alpha c) da) 255)))) 0)
+             :alpha (max (min (- (:alpha c) da) 255) 0))))
 
 ; mutate :: Point -&gt; Map -&gt; Point
 (defmethod mutate :Point [p settings]</diff>
      <filename>mona-clojure.clj</filename>
    </modified>
  </modified>
  <removed type="array"/>
  <parents type="array">
    <parent>
      <id>383db7b9c1df9108e3a3e7e4690d74716c3a8694</id>
    </parent>
  </parents>
  <author>
    <name>Yann Dauphin</name>
    <email>dhaemon@gmail.com</email>
  </author>
  <url>http://github.com/ynd/mona-clojure/commit/651980f42ce40d863a4c6cd938726a0284491573</url>
  <id>651980f42ce40d863a4c6cd938726a0284491573</id>
  <committed-date>2009-01-27T10:44:46-08:00</committed-date>
  <authored-date>2009-01-27T10:44:46-08:00</authored-date>
  <message>Fixed typo.</message>
  <tree>e1ec290c5d8b1a0daab6205356e763d1d36afa0e</tree>
  <committer>
    <name>Yann Dauphin</name>
    <email>dhaemon@gmail.com</email>
  </committer>
</commit>
