Merge remote-tracking branch 'c7skasku/ocaml-comment-insert'

This commit is contained in:
Maxime Coste 2024-01-17 21:01:04 +11:00
commit 11aede3493

View File

@ -14,6 +14,7 @@ hook global BufCreate .*\.(ml|mli|mll|mly)$ %{
hook global WinSetOption filetype=ocaml %{ hook global WinSetOption filetype=ocaml %{
require-module ocaml require-module ocaml
set-option window static_words %opt{ocaml_static_words} set-option window static_words %opt{ocaml_static_words}
hook window InsertChar -group ocaml-insert '\*' ocaml-insert-closing-comment-bracket
} }
hook -group ocaml-highlight global WinSetOption filetype=ocaml %{ hook -group ocaml-highlight global WinSetOption filetype=ocaml %{
@ -102,11 +103,9 @@ define-command ocaml-alternative-file -docstring 'Switch between .ml and .mli fi
# #
# Recognize when the user is trying to commence a comment when they type `(*` and # Recognize when the user is trying to commence a comment when they type `(*` and
# then automatically insert `*)` on behalf of the user. A small convenience. # then automatically insert `*)` on behalf of the user. A small convenience.
hook global WinSetOption filetype=ocaml %{ define-command -hidden ocaml-insert-closing-comment-bracket %{
hook window InsertChar '\*' %{
try %{ try %{
execute-keys -draft 'HH<a-k>\(\*<ret>' execute-keys -draft 'HH<a-k>\(\*<ret>'
execute-keys ' *)<left><left><left>' execute-keys ' *)<left><left><left>'
} }
} }
}