diff options
author | James Y Knight <jknight@itasoftware.com> | 2011-04-04 21:09:08 +0200 |
---|---|---|
committer | Eric Wong <normalperson@yhbt.net> | 2011-04-10 00:43:35 +0200 |
commit | f5549afd5d6c5492176b6fa21769c59bfe8e1d70 (patch) | |
tree | 4e003cfc36411dc2b56832fe410c8294f96dbfd3 | |
parent | git-svn: Add a svn-remote.<name>.pushurl config key (diff) | |
download | git-f5549afd5d6c5492176b6fa21769c59bfe8e1d70.tar.xz git-f5549afd5d6c5492176b6fa21769c59bfe8e1d70.zip |
git-svn: Cache results of running the executable "git config"
Running programs is not cheap!
Signed-off-by: James Y Knight <jknight@itasoftware.com>
Signed-off-by: Alejandro R. SedeƱo <asedeno@mit.edu>
Acked-by: Eric Wong <normalperson@yhbt.net>
Diffstat (limited to '')
-rwxr-xr-x | git-svn.perl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/git-svn.perl b/git-svn.perl index e5a553f007..bf0451b468 100755 --- a/git-svn.perl +++ b/git-svn.perl @@ -59,6 +59,7 @@ use File::Find; use Getopt::Long qw/:config gnu_getopt no_ignore_case auto_abbrev/; use IPC::Open3; use Git; +use Memoize; # core since 5.8.0, Jul 2002 BEGIN { # import functions from Git into our packages, en masse @@ -72,6 +73,8 @@ BEGIN { *{"${package}::$_"} = \&{"Git::$_"}; } } + Memoize::memoize 'Git::config'; + Memoize::memoize 'Git::config_bool'; } my ($SVN); @@ -3210,6 +3213,8 @@ sub has_no_changes { Memoize::unmemoize 'check_cherry_pick'; Memoize::unmemoize 'has_no_changes'; } + + Memoize::memoize 'Git::SVN::repos_root'; } END { |