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/part_pkg/prorate_calendar.pm2
3 files changed, 6 insertions, 5 deletions
diff --git a/FS/FS/TicketSystem/RT_External.pm b/FS/FS/TicketSystem/RT_External.pm
index 9f07732c7..b5414b97c 100644
--- a/FS/FS/TicketSystem/RT_External.pm
+++ b/FS/FS/TicketSystem/RT_External.pm
@@ -315,22 +315,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 13b2e2dc0..0e54aa26f 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/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