[add lte and showFixable methods to Fixable class
John Meacham <john@repetae.net>**20060225140638] hunk ./Fixer/Fixer.hs 49
+    lte :: a -> a -> Bool
+    lte x y = isBottom (x `minus` y)
+    showFixable :: a -> String
+    showFixable x | isBottom x = "."
+                  | otherwise = "*"
hunk ./Fixer/Fixer.hs 208
-            if isBottom diff then f vs n else do
+            --if isBottom diff then f vs n else do
+            if p `lte` c then f vs n else do
hunk ./Fixer/Fixer.hs 214
-            --putStr (show diff)
+            --putStr (showFixable diff)