From 037ce62894c25618100d23984d26729d663a82d2 Mon Sep 17 00:00:00 2001
From: Tim Pope <code@tpope.net>
Date: Sat, 14 Nov 2009 23:47:17 -0500
Subject: [PATCH] Pass :Glog arguments to git-log

---
 doc/fugitive.txt    |  7 +++++--
 plugin/fugitive.vim | 31 +++++++++++++++++++------------
 2 files changed, 24 insertions(+), 14 deletions(-)

diff --git a/doc/fugitive.txt b/doc/fugitive.txt
index 1e4d66c..0cbb887 100644
--- a/doc/fugitive.txt
+++ b/doc/fugitive.txt
@@ -56,8 +56,11 @@ that are part of Git repositories).
 :Ggrep [args]           |:grep| with git-grep as 'grepprg'.
 
                                                 *fugitive-:Glog*
-:Glog                   Load all commits that touched the current file into
-                        the quickfix list.
+:Glog [args]            Load all previous revisions of the current file into
+                        the quickfix list.  Additional git-log arguments can
+                        be given (for example, --reverse).  If "--" appears as
+                        an argument, no file specific filtering is done, and
+                        commits are loaded into the quickfix list.
 
                                         *fugitive-:Gedit* *fugitive-:Ge*
 :Gedit [revision]       |:edit| a |fugitive-revision|.
diff --git a/plugin/fugitive.vim b/plugin/fugitive.vim
index b3053b6..669a700 100644
--- a/plugin/fugitive.vim
+++ b/plugin/fugitive.vim
@@ -340,8 +340,6 @@ function! s:buffer_path(...) dict abort
   let rev = matchstr(self.name(),'^fugitive://.\{-\}//\zs.*')
   if rev != ''
     let rev = s:sub(rev,'\w*','')
-  elseif self.name() =~ '\.git/refs/\|\.git/.*HEAD$'
-    let rev = ''
   else
     let rev = self.name()[strlen(self.repo().tree()) : -1]
   endif
@@ -536,7 +534,7 @@ endfunction
 " Ggrep, Glog {{{1
 
 call s:command("-bar -bang -nargs=? -complete=customlist,s:EditComplete Ggrep :execute s:Grep(<bang>0,<q-args>)")
-call s:command("-bar -bang Glog :execute s:Log('grep<bang>')")
+call s:command("-bar -bang -nargs=* -complete=customlist,s:EditComplete Glog :execute s:Log('grep<bang>',<f-args>)")
 
 function! s:Grep(bang,arg) abort
   let grepprg = &grepprg
@@ -571,28 +569,37 @@ function! s:Grep(bang,arg) abort
   endtry
 endfunction
 
-function! s:Log(cmd)
+function! s:Log(cmd,...)
   let path = s:buffer().path('/')
-  if path =~# '^/\.git\%(/\|$\)'
+  if path =~# '^/\.git\%(/\|$\)' || index(a:000,'--') != -1
     let path = ''
   endif
-  let cmd = ['--no-pager', 'log', '--no-color', '--pretty=format:fugitive://'.s:repo().dir().'//%H'.path.'::%s']
-  if s:buffer().commit() =~# '\x\{40\}'
-    let cmd += [s:buffer().commit().'^']
-  endif
-  let cmd += ['--']
+  let cmd = ['--no-pager', 'log', '--no-color']
+  let cmd += [escape('--pretty=format:fugitive://'.s:repo().dir().'//%H'.path.'::%s','%')]
+  if empty(filter(a:000[0 : index(a:000,'--')],'v:val !~# "^-"'))
+    if s:buffer().commit() =~# '\x\{40\}'
+      let cmd += [s:buffer().commit()]
+    elseif s:buffer().path() =~# '^\.git/refs/\|^\.git/.*HEAD$'
+      let cmd += [s:buffer().path()[5:-1]]
+    endif
+  end
+  let cmd += map(copy(a:000),'s:sub(v:val,"^\\%(%(:\\w)*)","\\=fnamemodify(s:buffer().path(),submatch(1))")')
   if path =~# '/.'
-    let cmd += [path[1 : -1]]
+    let cmd += ['--',path[1:-1]]
   endif
   let grepformat = &grepformat
   let grepprg = &grepprg
+  let cd = exists('*haslocaldir') && haslocaldir() ? 'lcd ' : 'cd '
+  let cd .= s:fnameescape(getcwd())
   try
-    let &grepprg = escape(call(s:repo().git_command,cmd,s:repo()),'%')
+    cd `=s:repo().tree()`
+    let &grepprg = call(s:repo().git_command,cmd,s:repo())
     let &grepformat = '%f::%m'
     exe a:cmd
   finally
     let &grepformat = grepformat
     let &grepprg = grepprg
+    exe cd
   endtry
 endfunction