diff options
-rw-r--r-- | FS/bin/freeside-queued | 9 | ||||
-rw-r--r-- | init.d/freeside-init | 1 |
2 files changed, 10 insertions, 0 deletions
diff --git a/FS/bin/freeside-queued b/FS/bin/freeside-queued index 2188dd404..22fd7bb5e 100644 --- a/FS/bin/freeside-queued +++ b/FS/bin/freeside-queued @@ -157,6 +157,8 @@ while (1) { 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+)::/ @@ -191,6 +193,13 @@ while (1) { $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 } diff --git a/init.d/freeside-init b/init.d/freeside-init index c9bcebe37..4e58b32df 100644 --- a/init.d/freeside-init +++ b/init.d/freeside-init @@ -18,6 +18,7 @@ case "$1" in start) # Start daemons. echo -n "Starting freeside-queued: " + #perl -MDBIx::Profile /usr/local/bin/freeside-queued $QUEUED_USER freeside-queued $QUEUED_USER echo "done." |