projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add support for db profiling, RT#5662
[freeside.git]
/
FS
/
bin
/
freeside-queued
diff --git
a/FS/bin/freeside-queued
b/FS/bin/freeside-queued
index
2188dd4
..
22fd7bb
100644
(file)
--- a/
FS/bin/freeside-queued
+++ b/
FS/bin/freeside-queued
@@
-157,6
+157,8
@@
while (1) {
forksuidsetup($user);
forksuidsetup($user);
+ dbh->{'private_profile'} = {} if UNIVERSAL::can(dbh, 'sprintProfile');
+
#auto-use classes...
if ( $ljob->job =~ /(FS::(part_export|cust_main)::\w+)::/
|| $ljob->job =~ /(FS::\w+)::/
#auto-use classes...
if ( $ljob->job =~ /(FS::(part_export|cust_main)::\w+)::/
|| $ljob->job =~ /(FS::\w+)::/
@@
-191,6
+193,13
@@
while (1) {
$ljob->delete;
}
$ljob->delete;
}
+ if ( UNIVERSAL::can(dbh, 'sprintProfile') ) {
+ open(PROFILE,">%%%FREESIDE_LOG%%%/queueprofile.$$.".time)
+ or die "can't open profile file: $!";
+ print PROFILE dbh->sprintProfile();
+ close PROFILE or die "can't close profile file: $!";
+ }
+
exit;
#end-of-kid
}
exit;
#end-of-kid
}