gpicker/gpicker.vim at master · yltsrc/gpicker · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
"    Copyright: This program is free software: you can redistribute it and/or
"               modify it under the terms of the GNU General Public License as
"               published by the Free Software Foundation; either version 3 of the
"               License, or (at your option) any later version.
"
"               This program is distributed in the hope that it will be useful,
"               but WITHOUT ANY WARRANTY; without even the implied warranty of
"               MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
"               General Public License for more details.
"
"               You should have received a copy of the GNU General Public License
"               along with this program.  If not, see
"               `http://www.gnu.org/licenses/'.
"
" Name Of File: gpicker.vim
"  Description: Bindings for gpicker, fast file chooser.
"  Maintainers: Sergey Avseyev <sergey.avseyev@gmail.com>
" Contributors:
"
" Release Date: August 17, 2010
"      Version: 0.3
"     Keywords: autocompletion
"
"      Install: Copy file into ~/.vim/plugin directory or put in .vimrc
"
"                 source /path/to/this/script/gpicker.vim
"
"        Usage: To launch the gpicker:
"
"                 <Leader>mr - Opens the gpicker from directory of file.
"                 <Leader>mg - Opens the gpicker from current directory.
"                 <Leader>mb - Opens the gpicker to chose from list of
"                 current buffers.
"
"               You can also use the command:
"
"                 ":GPickFile"
"                 ":GPickFileFromHere"
"                 ":GPickBuffer"
"

" Exit quickly when already loaded.
if exists("g:loaded_gpicker") || executable("gpicker") == 0
  finish
endif

command GPickFile :call <SID>GPickFile(".", "guess")
command GPickFileDefault :call <SID>GPickFile(".", "default")
command GPickFileFromHere :call <SID>GPickFile(expand("%:h"), "guess")
function! s:GPickFile(path, type)
  if empty(a:path)
    let l:path = "."
  else
    let l:path = a:path
  endif
  " select file via gpicker
  let l:filename = l:path . "/" . system('gpicker -t ' . a:type . " " . shellescape(l:path))
  if filereadable(l:filename)
    " open selected file
    execute "edit " . escape(l:filename, ' ')
  endif
endfunction

command GPickBuffer :call <SID>GPickBuffer()
function! s:GPickBuffer()
  " grab list of buffers
  redir => l:ls_output
  silent execute 'ls'
  redir END

  " remove empty line from beginning and trailing line info
  let l:items = strpart(substitute(l:ls_output, '\(\d\+\)\s\+\([u%#ah=+x-]\+\)\s\+"\(.\{-}\)"\s\{-}line\s\+\d\+', '\3   \2 \1', 'g'), 1)
  " get selection via gpicker
  let l:selected  = system('gpicker --name-separator \\n -', items)
  " open buffer
  execute "buffer " . substitute(l:selected, '[u%#ah=+x-]\+\s\+\d\+$', '', '')
endfunction

nmap <silent> <leader>mg :GPickFile<cr>
nmap <silent> <leader>mf :GPickFileDefault<cr>
nmap <silent> <leader>mr :GPickFileFromHere<cr>
nmap <silent> <leader>mb :GPickBuffer<cr>

let g:loaded_gpicker = 1