;;; -*- lexical-binding: t -*-

(require 'syd/base)

(use-package gf)

(with-eval-after-load 'lsp-mode
  (add-to-list 'lsp-language-id-configuration
	       '(gf-mode . "grammatical-framework"))
  (lsp-register-client
   (make-lsp-client
    :new-connection (lsp-stdio-connection "gf-lsp")
    :activation-fn (lsp-activate-on "grammatical-framework")
    :server-id 'gf-lsp)))

(provide 'syd/grammatical-framework)
