Merge remote-tracking branch 'c7skasku/ocaml-comment-insert'
This commit is contained in:
commit
11aede3493
|
@ -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>'
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user