if ( $module eq 'Classic' ) {
tie %statuscolors, 'Tie::IxHash',
- 'prospect' => '7e0079', #'000000', #black? naw, purple
+ 'prospect' => 'FF00F5', #'000000', #black? naw, purple
'active' => '00CC00', #green
'ordered' => '009999', #teal? cyan?
'inactive' => '0000CC', #blue
;
} elsif ( $module eq 'Recurring' ) {
tie %statuscolors, 'Tie::IxHash',
- 'prospect' => '7e0079', #'000000', #black? naw, purple
+ 'prospect' => 'FF00F5', #'000000', #black? naw, purple
'active' => '00CC00', #green
'ordered' => '009999', #teal? cyan?
'suspended' => 'FF9900', #yellow
}
+sub statuslabels {
+ #my $self = shift; #i guess i'm a class method
+
+ my %statuslabels = (
+ 'prospect' => 'No packages',
+ 'active' => 'Active',
+ 'ordered' => 'Ordered',
+ 'inactive' => 'Inactive',
+ 'suspended' => 'Suspended',
+ 'cancelled' => 'Cancelled',
+ );
+
+ \%statuslabels;
+}
+
=item cancelled_sql
=cut