chore(haskell): settings

modules/home/haskell.nix

@@ -14,6 +14,10 @@ in {
     home.file.".ghc/ghci.conf".text = ''
       :set prompt "\x1b[38;5;5mλ>\x1b[0m "
       :set prompt-cont "\x1b[38;5;5m|>\x1b[0m "
+      :set -interactive-print=Text.Pretty.Simple.pPrint
+      :m + Text.Show.Functions
+      :unset +r
+      :set +m
     '';
 
     sydnix.impermanence.cache.directories =

modules/home/users/msyds/emacs/lisp/syd/haskell.el

@@ -67,6 +67,11 @@
   :custom ((lsp-haskell-server-path "haskell-language-server"))
   :init
   (add-hook 'haskell-mode-hook #'lsp-deferred 'append)
-  (add-hook 'haskell-literate-mode-hook #'lsp-deferred 'append))
+  (add-hook 'haskell-literate-mode-hook #'lsp-deferred 'append)
+  (syd-add-hook '(haskell-mode-hook haskell-literate-mode-hook)
+    (defun syd-haskell-configure-lsp-h ()
+      ;; it often highlights list literals and quasiquotes which
+      ;; gets reaaaally annoying.
+      (setq-local lsp-enable-symbol-highlighting nil))))
 
 (provide 'syd/haskell)