Fix agda indentation and README

This commit is contained in:
Eivind Fonn 2016-08-17 20:20:20 +02:00
parent 5096202b6b
commit dbbdca7d5d
3 changed files with 24 additions and 14 deletions

View File

@ -34,10 +34,16 @@ Then check that =agda= is available on your =$PATH= and seen by Emacs. For
information about setting up =$PATH=, check out the corresponding section in the
FAQ (~SPC h SPC $PATH RET~).
By default the =agda-mode= executable bundled with most agda installations
is used to locate the agda-mode package. If you don't have it and want to use
a local agda-mode package, you can customize the layer variable =agda-mode-path=
to your needs.
By default the =agda-mode= executable bundled with most agda installations is
used to locate the agda-mode package. If you don't have it and want to use a
local agda-mode package, you can customize the layer variable =agda-mode-path=
to your needs. Set it to =nil= if =agda2.el= is already discoverable in Emacs
load path, otherwise set it to the path at which =agda2.el= can be found. For
example,
#+BEGIN_SRC emacs-lisp
(agda2 :variables agda-mode-path "/some/path/to/agda2.el")
#+END_SRC
* Key bindings
The key bindings of this layer don't follow the Spacemacs conventions,

View File

@ -10,6 +10,7 @@
;;; License: GPLv3
(defvar agda-mode-path 'use-helper
"Indicates the location of the agda-mode package.
If `nil', it is assumed to be already available by Emacs.
If `'use-helper', the `agda-mode' executable is used to find its location.")
"Indicates the location of the agda-mode package (the file
`agda2.el') If `nil', it is assumed to be already available by
Emacs. If `use-helper', the `agda-mode' executable is used to
find its location.")

View File

@ -13,13 +13,16 @@
'((agda :location local)))
(defun agda/init-agda ()
(if (and (eq agda-mode-path 'use-helper) (not (executable-find "agda-mode")))
(spacemacs-buffer/warning
(concat "Couldn't find `agda-mode', make sure it is "
"available in your PATH or check the installation "
"instructions in the README file."))
(if (and (eq 'use-helper agda-mode-path)
(not (executable-find "agda-mode")))
(spacemacs-buffer/warning
(concat "Couldn't find `agda-mode', make sure it is "
"available in your PATH or check the installation "
"instructions in the README file."))
(when (eq agda-mode-path 'use-helper) (setq agda-mode-path (let ((coding-system-for-read 'utf-8)) (shell-command-to-string "agda-mode locate"))))
(when (eq 'use-helper agda-mode-path)
(setq agda-mode-path (let ((coding-system-for-read 'utf-8))
(shell-command-to-string "agda-mode locate"))))
(use-package agda2-mode
:defer t
@ -76,4 +79,4 @@
(with-eval-after-load 'golden-ratio
(add-to-list 'golden-ratio-exclude-buffer-names
"*Agda information*"))))))
"*Agda information*"))))))