cli.git: Better branch names maybe.

[factor.git] / extra / cli / git / git.factor

diff --git a/extra/cli/git/git.factor b/extra/cli/git/git.factor
index 2ea02a53cf678f5326d71fc7341168d04c94c02b..bfee6419ff2171e85552887f3f4b92321b4c5a2e 100644 (file)
--- a/extra/cli/git/git.factor
+++ b/extra/cli/git/git.factor
@@ -45,8 +45,7 @@ cli-git-num-parallel [ cpus 2 * ] initialize
     ?file-info dup [ directory? ] when ;
 
 : git-current-branch* ( -- name )
-     ! { "git" "rev-parse" "--abbrev-ref" "HEAD" }
-     { "git" "name-rev" "--name-only" "HEAD" } git-command>string ;
+     { "git" "rev-parse" "--abbrev-ref" "HEAD" } git-command>string ;
 
 : git-current-branch ( directory -- name )
     [ git-current-branch* ] with-directory ;