Complete things with tags iff tags-on-save is t

geraldus · geraldus · commit d4799311bf81 · 2016-04-19T14:59:45.000+05:00
diff --git a/haskell-completions.el b/haskell-completions.el
@@ -296,7 +296,8 @@ PREFIX should be a list such one returned by
                ('haskell-completions-language-extension-prefix
                 haskell-ghc-supported-extensions)
                (otherwise
-                (append tags-completion-table
+                (append (when (bound-and-true-p haskell-tags-on-save)
+                          tags-completion-table)
                         haskell-completions--keywords)))))
         (list beg end candidates)))))
 
