   :hook (elm-mode . lsp-deferred))
 
 (use-package haskell-mode
-  :bind ("C-c C-c" . haskell-process-load-file)
+  :bind ("C-c c" . haskell-process-load-file)
   :hook
   (haskell-literate-mode . lsp-deferred)
   (haskell-mode . lsp-deferred)

  (lsp-completion-provider :none)
  :commands (lsp lsp-deferred)
  :bind (:map lsp-mode-map
              ("C-c C-l a" . lsp-execute-code-action)
              ("C-c C-l d" . lsp-ui-peek-find-definitions)
              ("C-c C-l r" . lsp-ui-peek-find-references))
  :init
  (defun st/lsp-mode-setup-completion ()
    (setf (alist-get 'styles (alist-get 'lsp-capf completion-category-defaults))
          '(flex)))
  (setq lsp-keymap-prefix "C-c l")
  (setq lsp-enable-file-watchers nil)
  (setq read-process-output-max (* 1024 1024)) ;; 1mb
  (setq lsp-log-io nil)

  :custom (lsp-haskell-server-path "haskell-language-server-wrapper"))

(use-package python-mode
  :bind (:map python-mode-map ("C-c c" . run-python))
  :custom
  (python-shell-interpreter "ipython")
  (python-shell-interpreter-args "-i --simple-prompt")
