percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2026-04-17 01:01:39 +08:00
Code Issues Packages Projects Releases Wiki Activity

Fix 'Modification of a read-only value attempted at /home/ptagent/pt-agent/bin/pt-agent line 5691'.

Browse Source
This commit is contained in:
Daniel Nichter
2013-03-26 14:26:40 -06:00
parent b9a82c21b9
commit 58ea0f1886
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bin/pt-agent
View File

@@ -5687,8 +5687,8 @@ sub run_service {
. "config.\n"; . "config.\n";
} }
foreach my $dir ( $service, '.tmp' ) { foreach my $subdir ( $service, '.tmp' ) {
$dir = "$spool_dir/$dir"; my $dir = "$spool_dir/$subdir";
if ( ! -d $dir ) { if ( ! -d $dir ) {
_info("$dir does not exist, creating"); _info("$dir does not exist, creating");
mkdir $dir or die "Cannot mkdir $dir: $OS_ERROR"; mkdir $dir or die "Cannot mkdir $dir: $OS_ERROR";