(minor) do not run gitolite query-rc from *perl* programs!

I must have blindly converted from some shell-thinking/shell-code for
these to have slipped through!

(found when doing an audit of all system, exec, ``, qx, and tsh_)
This commit is contained in:
Sitaram Chamarty 2012-04-13 13:58:40 +05:30
parent afc2c14a65
commit 720729e4b4
2 changed files with 5 additions and 6 deletions

View file

@ -13,8 +13,8 @@ in doc/sskm.mkd or online at http://sitaramc.github.com/gitolite/sskm.html.
usage() if @ARGV and $ARGV[0] eq '-h';
my $rb = `gitolite query-rc -n GL_REPO_BASE`;
my $ab = `gitolite query-rc -n GL_ADMIN_BASE`;
my $rb = $rc{GL_REPO_BASE};
my $ab = $rc{GL_ADMIN_BASE};
# get to the keydir
_chdir("$ab/keydir");