improving doc.
This commit is contained in:
@@ -1,3 +1,13 @@
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;;;
|
||||
;;; ghc-flymake.el
|
||||
;;;
|
||||
|
||||
;; Author: Kazu Yamamoto <Kazu@Mew.org>
|
||||
;; Created: Mar 12, 2010
|
||||
|
||||
;;; Code:
|
||||
|
||||
(require 'flymake)
|
||||
|
||||
(defvar ghc-flymake-allowed-file-name-masks
|
||||
@@ -19,15 +29,4 @@
|
||||
(list ghc-module-command (append (ghc-module-command-args)
|
||||
(list "check" file)))))
|
||||
|
||||
;; ghc --make GHCMod.hs -outputdir dist/flymake -o dist/flymake/GHCMod
|
||||
|
||||
;; (defun ghc-flymake-init ()
|
||||
;; (let* ((temp-file (flymake-init-create-temp-buffer-copy
|
||||
;; 'flymake-create-temp-inplace))
|
||||
;; (local-file (file-relative-name
|
||||
;; temp-file
|
||||
;; (file-name-directory buffer-file-name))))
|
||||
;; (list ghc-module-command (append (ghc-module-command-args)
|
||||
;; (list "check" local-file)))))
|
||||
|
||||
(provide 'ghc-flymake)
|
||||
Reference in New Issue
Block a user