projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
fix payment amount search, RT#34471
[freeside.git]
/
FS
/
FS
/
Cron
/
cacti_cleanup.pm
1
package FS::Cron::cacti_cleanup;
2
use base 'Exporter';
3
use vars '@EXPORT_OK';
4
5
use FS::Record qw( qsearch );
6
use Data::Dumper;
7
8
@EXPORT_OK = qw( cacti_cleanup );
9
10
sub cacti_cleanup {
11
foreach my $export (qsearch({
12
'table' => 'part_export',
13
'hashref' => { 'exporttype' => 'cacti' }
14
})) {
15
$export->cleanup;
16
}
17
}
18
19
1;