awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-09-18 16:06:56 -05:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #4842 from rgrinberg/fix-ocamlformat

Browse Source 
ocamlforamt hook: buffers without a file name
This commit is contained in:
Henrik Lissner
2021-04-13 19:15:59 -04:00
committed by GitHub
parent 84d5cda86f 47d9f52b6f
commit 876bdb523c
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
modules/lang/ocaml/config.el
View File

@@ -111,9 +111,10 @@
(setq +format-with 'ocp-indent) (setq +format-with 'ocp-indent)
(when (and (executable-find "ocamlformat") (when (and (executable-find "ocamlformat")
(locate-dominating-file default-directory ".ocamlformat")) (locate-dominating-file default-directory ".ocamlformat"))
(let ((ext (file-name-extension buffer-file-name t))) (when buffer-file-name
(cond ((equal ext ".eliom") (let ((ext (file-name-extension buffer-file-name t)))
(setq-local ocamlformat-file-kind 'implementation)) (cond ((equal ext ".eliom")
((equal ext ".eliomi") (setq-local ocamlformat-file-kind 'implementation))
(setq-local ocamlformat-file-kind 'interface)))) ((equal ext ".eliomi")
(setq-local ocamlformat-file-kind 'interface)))))
(setq +format-with 'ocamlformat)))) (setq +format-with 'ocamlformat))))