diff options
author | Eric Wong <e@80x24.org> | 2017-02-10 21:19:11 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2017-02-10 21:19:11 +0000 |
commit | 2be17f6aaa30fe927a410eed2bcca6717cf6f766 (patch) | |
tree | 9fdd267d9c7b3d3fc0f9a13365177e933289ecb3 | |
parent | 7c3d8e174c15193851f811f22694ddb47cb11c65 (diff) | |
download | public-inbox-2be17f6aaa30fe927a410eed2bcca6717cf6f766.tar.gz |
And add a note to remove git_commit_title
-rw-r--r-- | lib/PublicInbox/RepoGit.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/PublicInbox/RepoGit.pm b/lib/PublicInbox/RepoGit.pm index f7bf0b9d..b44457ca 100644 --- a/lib/PublicInbox/RepoGit.pm +++ b/lib/PublicInbox/RepoGit.pm @@ -19,7 +19,7 @@ my %GIT_ESC = ( v => "\013", ); -sub git_unquote { +sub git_unquote ($) { my ($s) = @_; return $s unless ($s =~ /\A"(.*)"\z/); $s = $1; @@ -28,7 +28,8 @@ sub git_unquote { $s; } -sub git_commit_title { +# Remove, hilariously slow +sub git_commit_title ($$) { my ($git, $obj) = @_; # PublicInbox::Git, $sha1hex my $rv; eval { @@ -39,7 +40,7 @@ sub git_commit_title { } # example inputs: "HEAD -> master", "tag: v1.0.0", -sub git_dec_links { +sub git_dec_links ($$) { my ($rel, $D) = @_; my @l; foreach (split /, /, $D) { |