diff --git a/init.el b/init.el
index 7ccc481..30995db 100644
--- a/init.el
+++ b/init.el
@@ -359,6 +359,7 @@
   (c++-ts-mode . eglot-ensure)
   (java-mode . eglot-ensure)
   (java-ts-mode . eglot-ensure)
+  (haskell-mode . eglot-ensure)
   (lua-mode . eglot-ensure)
   (nix-mode . eglot-ensure)
   (js-mode . eglot-ensure)
@@ -367,7 +368,12 @@
   (tsx-ts-mode . eglot-ensure)
   :custom
   (eglot-events-buffer-size 0)
-  (eglot-autoshutdown t))
+  (eglot-autoshutdown t)
+  (eglot-confirm-server-initiated-edits nil)
+  :config
+  (setq-default eglot-workspace-configuration
+                '((haskell
+                   (formattingProvider . "floskell")))))
 
 (use-package eglot-java
   :hook java-mode java-ts-mode)
@@ -621,6 +627,10 @@
 (use-package racket-mode
   :hook (racket-mode . racket-xp-mode))
 
+(use-package haskell-mode
+  :custom
+  (haskell-process-show-debug-tips nil))
+
 ;; (use-package web-mode
 ;;   :mode ("\\.\\([jt]sx?\\|css\\)\\'" . web-mode)
 ;;   :custom
@@ -1041,7 +1051,7 @@
   (add-hook hook #'my-relative-linenum))
 
 (defun my-use-spaces-for-indent ()
-  "Simply  turnoff `indent-tabs-mode'."
+  "Simply turn off `indent-tabs-mode'."
   (setq indent-tabs-mode nil))
 (dolist (hook '(emacs-lisp-mode-hook
                 lisp-mode-hook