75 lines
2.8 KiB
Plaintext
75 lines
2.8 KiB
Plaintext
# http://haskell.org/cabal
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
# Detection
|
|
# ‾‾‾‾‾‾‾‾‾
|
|
|
|
hook global BufCreate .*[.](cabal) %{
|
|
set-option buffer filetype cabal
|
|
}
|
|
|
|
# Highlighters
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
add-highlighter shared/cabal regions
|
|
add-highlighter shared/cabal/code default-region group
|
|
add-highlighter shared/cabal/line_comment region (--) $ fill comment
|
|
add-highlighter shared/cabal/comment region -recurse \{- \{- -\} fill comment
|
|
|
|
add-highlighter shared/cabal/code/ regex \b(true|false)\b|(([<>]?=?)?\d+(\.\d+)+) 0:value
|
|
add-highlighter shared/cabal/code/ regex \b(if|else)\b 0:keyword
|
|
add-highlighter shared/cabal/code/ regex ^\h*([A-Za-z][A-Za-z0-9_-]*)\h*: 1:variable
|
|
|
|
# Commands
|
|
# ‾‾‾‾‾‾‾‾
|
|
|
|
define-command -hidden cabal-filter-around-selections %{
|
|
# remove trailing white spaces
|
|
try %{ execute-keys -draft -itersel <a-x> s \h+$ <ret> d }
|
|
}
|
|
|
|
define-command -hidden cabal-indent-on-new-line %[
|
|
evaluate-commands -draft -itersel %[
|
|
# copy '#' comment prefix and following white spaces
|
|
try %[ execute-keys -draft k <a-x> s ^\h*\K#\h* <ret> y gh j P ]
|
|
# preserve previous line indent
|
|
try %[ execute-keys -draft \; K <a-&> ]
|
|
# filter previous line
|
|
try %[ execute-keys -draft k : cabal-filter-around-selections <ret> ]
|
|
# indent after lines ending with { or :
|
|
try %[ execute-keys -draft <space> k <a-x> <a-k> [:{]$ <ret> j <a-gt> ]
|
|
]
|
|
]
|
|
|
|
define-command -hidden cabal-indent-on-opening-curly-brace %[
|
|
evaluate-commands -draft -itersel %[
|
|
# align indent with opening paren when { is entered on a new line after the closing paren
|
|
try %[ execute-keys -draft h <a-F> ) M <a-k> \A\(.*\)\h*\n\h*\{\z <ret> s \A|.\z <ret> 1<a-&> ]
|
|
]
|
|
]
|
|
|
|
define-command -hidden cabal-indent-on-closing-curly-brace %[
|
|
evaluate-commands -draft -itersel %[
|
|
# align to opening curly brace when alone on a line
|
|
try %[ execute-keys -draft <a-h> <a-k> ^\h+\}$ <ret> h m s \A|.\z<ret> 1<a-&> ]
|
|
]
|
|
]
|
|
|
|
# Initialization
|
|
# ‾‾‾‾‾‾‾‾‾‾‾‾‾‾
|
|
|
|
hook -group cabal-highlight global WinSetOption filetype=cabal %{ add-highlighter window/cabal ref cabal }
|
|
|
|
hook global WinSetOption filetype=cabal %[
|
|
hook window ModeChange insert:.* -group cabal-hooks cabal-filter-around-selections
|
|
hook window InsertChar \n -group cabal-indent cabal-indent-on-new-line
|
|
hook window InsertChar \{ -group cabal-indent cabal-indent-on-opening-curly-brace
|
|
hook window InsertChar \} -group cabal-indent cabal-indent-on-closing-curly-brace
|
|
]
|
|
|
|
hook -group cabal-highlight global WinSetOption filetype=(?!cabal).* %{ remove-highlighter window/cabal }
|
|
|
|
hook global WinSetOption filetype=(?!cabal).* %{
|
|
remove-hooks window cabal-.+
|
|
}
|