M-t for hlint. An error/warning place is replaced with suggestion

but not perfect.
2010-06-14 14:26:14 +09:00
parent ca50279546
commit badaea4eff
2 changed files with 12 additions and 3 deletions
--- a/elisp/ghc-command.el
+++ b/elisp/ghc-command.el
@@ -15,12 +15,12 @@
  (cond
   ((bobp)
    (ghc-insert-module-template))
+   ((ghc-flymake-have-errs-p)
+    (ghc-flymake-insert-from-warning))
   ((save-excursion
      (beginning-of-line)
      (looking-at "^[^ ]+ *::"))
    (ghc-insert-function-template))
-   ((ghc-flymake-have-errs-p)
-    (ghc-flymake-insert-from-warning))
   (t
    (message "Nothing to be done"))))