(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:
parent
afc2c14a65
commit
720729e4b4
2 changed files with 5 additions and 6 deletions
|
@ -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");
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue