contrib: update packinfo.pl to not use dashed commands

Signed-off-by: Dan McGee <dpmcgee@gmail.com>
Signed-off-by: Junio C Hamano <gitster@pobox.com>

diff --git a/contrib/stats/packinfo.pl b/contrib/stats/packinfo.pl
index f4a7b62cd9f1a397118b95792c04c2f70f910f9e..be188c0f11dbea8320737b4fdf426a2f5acd1a00 100755 (executable)
--- a/contrib/stats/packinfo.pl
+++ b/contrib/stats/packinfo.pl
@@ -1,9 +1,9 @@
 #!/usr/bin/perl
 #
 # This tool will print vaguely pretty information about a pack.  It
 #!/usr/bin/perl
 #
 # This tool will print vaguely pretty information about a pack.  It

-# expects the output of "git-verify-pack -v" as input on stdin.
+# expects the output of "git verify-pack -v" as input on stdin.

 #
 #

-# $ git-verify-pack -v | packinfo.pl
+# $ git verify-pack -v | packinfo.pl

 #
 # This prints some full-pack statistics; currently "all sizes", "all
 # path sizes", "tree sizes", "tree path sizes", and "depths".
 #
 # This prints some full-pack statistics; currently "all sizes", "all
 # path sizes", "tree sizes", "tree path sizes", and "depths".


@@ -20,7 +20,7 @@
 #
 # When run as:
 #
 #
 # When run as:
 #

-# $ git-verify-pack -v | packinfo.pl -tree
+# $ git verify-pack -v | packinfo.pl -tree

 #
 # the trees of objects are output along with the stats.  This looks
 # like:
 #
 # the trees of objects are output along with the stats.  This looks
 # like:


@@ -43,7 +43,7 @@
 #
 # When run as:
 #
 #
 # When run as:
 #

-# $ git-verify-pack -v | packinfo.pl -tree -filenames
+# $ git verify-pack -v | packinfo.pl -tree -filenames

 #
 # it adds filenames to the tree.  Getting this information is slow:
 #
 #
 # it adds filenames to the tree.  Getting this information is slow:
 #


@@ -58,7 +58,7 @@
 #
 # When run as:
 #
 #
 # When run as:
 #

-# $ git-verify-pack -v | packinfo.pl -dump
+# $ git verify-pack -v | packinfo.pl -dump

 #
 # it prints out "sha1 size pathsize depth" for each sha1 in lexical
 # order.
 #
 # it prints out "sha1 size pathsize depth" for each sha1 in lexical
 # order.


@@ -106,7 +106,7 @@
 }
 
 if ($filenames && ($tree || $dump)) {
 }
 
 if ($filenames && ($tree || $dump)) {

-    open(NAMES, "git-name-rev --all|");
+    open(NAMES, "git name-rev --all|");

     while (<NAMES>) {
         if (/^(\S+)\s+(.*)$/) {
             my ($sha1, $name) = ($1, $2);
     while (<NAMES>) {
         if (/^(\S+)\s+(.*)$/) {
             my ($sha1, $name) = ($1, $2);


@@ -117,7 +117,7 @@
 
     for my $commit (@commits) {
         my $name = $names{$commit};
 
     for my $commit (@commits) {
         my $name = $names{$commit};

-        open(TREE, "git-ls-tree -t -r $commit|");
+        open(TREE, "git ls-tree -t -r $commit|");

         print STDERR "Plumbing tree $name\n";
         while (<TREE>) {
             if (/^(\S+)\s+(\S+)\s+(\S+)\s+(.*)$/) {
         print STDERR "Plumbing tree $name\n";
         while (<TREE>) {
             if (/^(\S+)\s+(\S+)\s+(\S+)\s+(.*)$/) {