From d1c07f805637c2cb0df893a87805c2756275e47e Mon Sep 17 00:00:00 2001
From: tslil clingman <>
Date: Wed, 7 Jul 2021 19:56:21 -0400
Subject: Using hls, and it's amazing!

---
 emacs/inits/21-functional.el | 35 +++++++----------------------------
 1 file changed, 7 insertions(+), 28 deletions(-)

(limited to 'emacs')

diff --git a/emacs/inits/21-functional.el b/emacs/inits/21-functional.el
index 07aaede..f863145 100644
--- a/emacs/inits/21-functional.el
+++ b/emacs/inits/21-functional.el
@@ -1,24 +1,14 @@
-;; Time-stamp: <2019-02-02 18:55:41 (tslil@winslow)>
+;; Time-stamp: <2021-07-07 19h56 EDT (hobbies)>
 
 ;; -----------------------------------------------------------------------------
 ;; Haskell
 
-(use-package ghc :ensure t :defer t)
-
-(use-package company-ghc :ensure t :defer t)
-
-(use-package company-ghci :ensure t :defer t)
-
-(use-package shm :ensure t
-  :functions structured-haskell-mode
-  :bind (:map shm-map
-              ("C-c C-s" . shm/case-split)))
+(use-package lsp-haskell :ensure t :defer)
 
 (use-package haskell-mode
   :ensure t
-  :after  (company-ghc company-ghci shm)
   :bind (:map haskell-mode-map
-              ("[f8]". haskell-navigate-imports)
+              ("C-c C-p". haskell-navigate-imports)
               ("C-c C-c" . haskell-compile)
               ("C-c C-z" . haskell-interactive-switch)
               ("C-c C-l" . haskell-process-load-file)
@@ -32,30 +22,19 @@
          (haskell-mode . (lambda ()
                            (subword-mode 1)
                            (aggressive-indent-mode -1)
-                           (require 'shm)
-                           (require 'shm-case-split)
-                           (require 'ghc)
-                           (ghc-init)
-                           (structured-haskell-mode)
-                           ;; (haskell-indentation-mode)
+                           (haskell-indentation-mode)
                            (interactive-haskell-mode)
                            (turn-on-haskell-doc-mode)
                            (turn-on-haskell-decl-scan)
-                           (add-to-list 'company-backends 'company-ghc)
-                           (add-to-list 'company-backends 'company-ghci)
-                           ;; (turn-on-haskell-unicode-input-method)
-                           ;; (haskell-mode-stylish-buffer)
-                           )))
+													 (lsp)
+                           (haskell-mode-stylish-buffer))))
   :config
   (setq haskell-doc-show-global-types t
         haskell-doc-show-prelude t
         haskell-doc-show-user-defined t
         haskell-doc-show-reserved t
         haskell-interactive-mode-eval-pretty t
-        haskell-process-type 'cabal-repl
-        company-ghc-show-info t
-        company-ghc-autoscan t
-        company-ghc-show-module t
+        haskell-process-type 'auto
         haskell-stylish-on-save t
         haskell-process-use-presentation-mode t
         haskell-process-suggest-imports t
-- 
cgit v1.2.3