Fixed lint output bug

5264c05e · root · c383d257 · 5264c05e
Commit 5264c05e authored Jan 21, 2016 by root
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

Lint.hs src/IHaskell/Eval/Lint.hs +1 -1

No files found.
--- a/src/IHaskell/Eval/Lint.hs
+++ b/src/IHaskell/Eval/Lint.hs
@@ -187,7 +187,7 @@ htmlSuggestions = concatMap toHtml
            _ -> "warning"

    style :: String -> String -> String
-    style =  printf "<div class=\"suggestion-${cls}\">%s</div>"
+    style =  printf "<div class=\"suggestion-%s\">%s</div>"

    named :: String -> String
    named = printf "<div class=\"suggestion-name\" style=\"clear:both;\">%s</div>"