geiser-eval-last-sexp breaks when including Haskell mode
Created by: kwrooijen
When I include haskell-mode
as one of my packages it will break Geiser.
Steps to reproduce:
- Create test.scm file
- Write
(display "test")
in this file - Save
- execute
M-x run-geiser
- Choose Scheme implementation (in my case Guile)
- Go to the end of the sexp and run
C-x C-e
(geiser-eval-last-sexp)
Expected to have "test" displayed, instead I get the error message:
geiser-syntax--fontify: Wrong number of arguments: #[nil "Â
\00ÃÄ! )" [font-lock-verbose font-lock-fontify-buffer-function font-lock-set-defaults called-interactively-p interactive] 2 2311517 nil], 2
This also happens when including elm-mode
. I can't say for sure but I'm going to assume elm-mode derives from haskell mode (because of syntax similarities), causing it to inherit this error as well.
So yes, very strange. This forces me to remove Elm / Haskell from my package list in order to actually get Geiser to work properly. On a side note: the same error appears when adding company-elm
to company-backends
, but not requiring elm-mode itself.
I've written a very simplistic init file that causes the error below.
Tools: Emacs 24.5.1 Guile 2.0.11 Geiser - Latest from Melpa
(require 'package)
(require 'ert)
(setq package-enable-at-startup nil)
(add-to-list 'package-archives '("melpa" . "http://melpa.milkbox.net/packages/") t)
(package-initialize)
(unless (package-installed-p 'use-package)
(package-refresh-contents)
(package-install 'use-package))
(eval-when-compile
(require 'use-package))
(use-package haskell-mode
:ensure t)
(use-package geiser
:ensure t)
;; These also cause this error when uncommented
;; (use-package elm-mode
;; :ensure t)
;; (use-package company
;; :ensure t
;; :config
;; (add-to-list 'company-backends 'company-elm)
;; (add-hook 'scheme-mode-hook 'company-mode))