Emacs 22 does not support :risky.
This commit is contained in:
parent
26c0d77c79
commit
ac09c56cfd
@ -19,7 +19,7 @@
|
|||||||
(defcustom ghc-flymake-check-includes nil
|
(defcustom ghc-flymake-check-includes nil
|
||||||
"list of directories to include when checking file"
|
"list of directories to include when checking file"
|
||||||
:type '(repeat string)
|
:type '(repeat string)
|
||||||
:risky nil
|
;; :risky nil
|
||||||
:require 'ghc-flymake
|
:require 'ghc-flymake
|
||||||
:group 'ghc-flymake)
|
:group 'ghc-flymake)
|
||||||
|
|
||||||
@ -57,7 +57,7 @@
|
|||||||
(list "check" file)
|
(list "check" file)
|
||||||
(let ((includes (ghc-mapconcat (lambda (x) (list "-i" x)) ghc-flymake-check-includes)))
|
(let ((includes (ghc-mapconcat (lambda (x) (list "-i" x)) ghc-flymake-check-includes)))
|
||||||
`("check" ,@includes ,file)))))
|
`("check" ,@includes ,file)))))
|
||||||
|
|
||||||
(defun ghc-flymake-toggle-command ()
|
(defun ghc-flymake-toggle-command ()
|
||||||
(interactive)
|
(interactive)
|
||||||
(setq ghc-flymake-command (not ghc-flymake-command))
|
(setq ghc-flymake-command (not ghc-flymake-command))
|
||||||
|
Loading…
Reference in New Issue
Block a user