fixing a bug to call ghc-mod twice.
This commit is contained in:
parent
63e59cbebd
commit
90cc99f203
@ -106,7 +106,7 @@
|
||||
(let ((types (ghc-type-obtain-tinfos modname)))
|
||||
(if (not (listp types)) ;; main does not exist in Main
|
||||
(ghc-type-set-types nil)
|
||||
(ghc-type-set-types (ghc-type-obtain-tinfos modname))
|
||||
(ghc-type-set-types types)
|
||||
(ghc-type-set-point (point))
|
||||
(ghc-type-set-ix 0))))
|
||||
(ghc-type-get-types))
|
||||
|
Loading…
Reference in New Issue
Block a user