diff --git a/after/ftplugin/haskell.vim b/after/ftplugin/haskell.vim
index a0a8f5c..f9b0ee2 100644
--- a/after/ftplugin/haskell.vim
+++ b/after/ftplugin/haskell.vim
@@ -65,8 +65,9 @@ let g:LanguageClient_serverCommands = {
 " we use ALE instead
 let g:LanguageClient_diagnosticsEnable = 0
 
-nnoremap <silent> <F7> :call LanguageClient#textDocument_hover()<CR>
+nnoremap <leader>lc :call LanguageClient_contextMenu()<CR>
 nnoremap <silent> gd :call LanguageClient#textDocument_definition()<CR>
+nnoremap <silent> <C-F6> :call LanguageClient#textDocument_hover()<CR>
 nnoremap <silent> <F8> :call LanguageClient#textDocument_rename()<CR>
 
 " deoplete