summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/TicketSystem/RT_External.pm8
-rw-r--r--FS/FS/UI/Web.pm1
-rw-r--r--FS/FS/cdr.pm2
-rw-r--r--FS/FS/part_pkg/prorate_calendar.pm2
4 files changed, 7 insertions, 6 deletions
diff --git a/FS/FS/TicketSystem/RT_External.pm b/FS/FS/TicketSystem/RT_External.pm
index c2aac2db7..20d78c8fc 100644
--- a/FS/FS/TicketSystem/RT_External.pm
+++ b/FS/FS/TicketSystem/RT_External.pm
@@ -316,22 +316,22 @@ sub href_params_new_ticket {
my $subtype = $object->table;
my $pkey = $object->get($object->primary_key);
- my %param = (
+ my @param = (
'Queue' => ($cust_main->agent->ticketing_queueid || $default_queueid),
'new-MemberOf'=> "freeside://freeside/$subtype/$pkey",
'Requestors' => $requestors,
);
- ( $self->baseurl.'Ticket/Create.html', %param );
+ ( $self->baseurl.'Ticket/Create.html', @param );
}
sub href_new_ticket {
my $self = shift;
- my( $base, %param ) = $self->href_params_new_ticket(@_);
+ my( $base, @param ) = $self->href_params_new_ticket(@_);
my $uri = new URI $base;
- $uri->query_form(%param);
+ $uri->query_form(@param);
$uri;
}
diff --git a/FS/FS/UI/Web.pm b/FS/FS/UI/Web.pm
index 69de5e157..d73d9cfc0 100644
--- a/FS/FS/UI/Web.pm
+++ b/FS/FS/UI/Web.pm
@@ -623,6 +623,7 @@ sub random_id {
if (!defined $NO_RANDOM_IDS) {
my $conf = FS::Conf->new;
$NO_RANDOM_IDS = $conf->exists('no_random_ids') ? 1 : 0;
+ warn "TEST MODE--RANDOM ID NUMBERS DISABLED\n" if $NO_RANDOM_IDS;
}
if ( $NO_RANDOM_IDS ) {
if ( $digits > 0 ) {
diff --git a/FS/FS/cdr.pm b/FS/FS/cdr.pm
index db9832a4b..cdca6fc75 100644
--- a/FS/FS/cdr.pm
+++ b/FS/FS/cdr.pm
@@ -1458,7 +1458,7 @@ as keys (for use with part_pkg::voip_cdr) and "pretty" format names as values.
sub invoice_formats {
map { ($_ => $export_names{$_}->{'name'}) }
grep { $export_names{$_}->{'invoice_header'} }
- keys %export_names;
+ sort keys %export_names;
}
=item invoice_header FORMAT
diff --git a/FS/FS/part_pkg/prorate_calendar.pm b/FS/FS/part_pkg/prorate_calendar.pm
index 83a80f5d0..c50cae0d7 100644
--- a/FS/FS/part_pkg/prorate_calendar.pm
+++ b/FS/FS/part_pkg/prorate_calendar.pm
@@ -36,7 +36,7 @@ use base 'FS::part_pkg::flat';
},
'fieldorder' => [ 'cutoff_day', 'prorate_defer_bill', 'prorate_round_day', 'prorate_verbose' ],
'freq' => 'm',
- 'weight' => 20,
+ 'weight' => 23,
);
my %freq_max_days = ( # the length of the shortest period of each cycle type