diff --git a/after/ftplugin/haskell.vim b/after/ftplugin/haskell.vim
index d302787..0cb0ad6 100644
--- a/after/ftplugin/haskell.vim
+++ b/after/ftplugin/haskell.vim
@@ -15,10 +15,12 @@ call CmdAlias('hasktags', '!hasktags -c .<CR>')
 call CmdAlias('codex', 'call system("haskell-ctags")<CR><CR>call LoadHscope()<CR>')
 
 
-map <leader>tg :codex<CR>
+map <leader>ctg :codex<CR>
 set tags=tags;/,codex.tags;/
 
+" classic ctags jump
 nnoremap <leader>gd <C-]>
+
 nnoremap <silent> <leader>cgd :cs find g <C-R>=expand("<cword>")<CR><CR>
 nnoremap <silent> <C-\> :cs find c <C-R>=expand("<cword>")<CR><CR>
 
diff --git a/plugin/keys.vim b/plugin/keys.vim
index c4d74f1..9d26569 100644
--- a/plugin/keys.vim
+++ b/plugin/keys.vim
@@ -153,3 +153,7 @@ inoremap <C-V> <C-O>:call Paste("i")<CR>
 " select all
 nnoremap <C-A> ggVG<CR>
 inoremap <C-A> <C-O>:call Select()<CR>
+
+" fzf
+nnoremap <leader>tg :call fzf#vim#tags(expand('<cword>'), {'options': '--exact --select-1 --exit-0'})<CR>
+