@@ -201,7 +201,9 @@ Defaults to \"output/\" and should only be changed with
201
201
; ; Don't add an import when the option to do so is disabled
202
202
(not psc-ide-add-import-on-completion)
203
203
; ; or when a qualified identifier was completed
204
- (or (get-text-property 0 :qualifier arg) (s-contains-p " ." (company-grab-symbol))))
204
+ (or (get-text-property 0 :qualifier arg) (s-contains-p " ." (company-grab-symbol)))
205
+ ; ; Don't attempt to import Prim members
206
+ (string= (get-text-property 0 :module arg) " Prim" ))
205
207
(psc-ide-add-import-impl arg (vector
206
208
(psc-ide-filter-modules
207
209
(list (get-text-property 0 :module arg))))))))))
@@ -512,7 +514,7 @@ The cases we have to cover:
512
514
; ; 3. fil| <- filter by prefix and imported modules"
513
515
(psc-ide-command-complete
514
516
(vector (psc-ide-filter-prefix prefix)
515
- (psc-ide-filter-modules (psc-ide-all-imported-modules)))
517
+ (psc-ide-filter-modules (cons " Prim " ( psc-ide-all-imported-modules) )))
516
518
nil
517
519
(psc-ide-get-module-name))))))
518
520
@@ -626,7 +628,7 @@ on whether WARN is true. Optionally EXPANDs type synonyms."
626
628
(psc-ide-qualified-type-command ident qualifier)
627
629
(psc-ide-command-show-type
628
630
(vector (psc-ide-filter-modules
629
- (psc-ide-all-imported-modules)))
631
+ (cons " Prim " ( psc-ide-all-imported-modules) )))
630
632
ident
631
633
(psc-ide-get-module-name)))))
632
634
0 commit comments