summaryrefslogtreecommitdiff
path: root/FS/FS/TicketSystem/RT_Internal.pm
diff options
context:
space:
mode:
Diffstat (limited to 'FS/FS/TicketSystem/RT_Internal.pm')
-rw-r--r--FS/FS/TicketSystem/RT_Internal.pm33
1 files changed, 26 insertions, 7 deletions
diff --git a/FS/FS/TicketSystem/RT_Internal.pm b/FS/FS/TicketSystem/RT_Internal.pm
index 8fce918e0..00398230f 100644
--- a/FS/FS/TicketSystem/RT_Internal.pm
+++ b/FS/FS/TicketSystem/RT_Internal.pm
@@ -16,13 +16,32 @@ sub sql_num_customer_tickets {
)";
}
-sub baseurl {
- #my $self = shift;
- if ( $RT::URI::freeside::URL ) {
- $RT::URI::freeside::URL. 'rt/';
- } else {
- 'http://you_need_to_set_RT_URI_freeside_URL_in_SiteConfig.pm/';
- }
+sub num_customer_tickets {
+ my( $self, $custnum, $priority ) = ( shift, shift, shift );
+ $self->SUPER::num_customer_tickets( $custnum, $priority, dbh );
+}
+
+sub customer_tickets {
+ my( $self, $custnum, $limit, $priority ) = ( shift, shift, shift, shift );
+ $self->SUPER::customer_tickets( $custnum, $limit, $priority, dbh );
+}
+
+sub href_customer_tickets {
+ my $self = shift;
+ # well, 2 is wrong here but will have to do for now
+ popurl(2).'rt/'. $self->SUPER::href_customer_tickets(@_);
+}
+
+sub href_new_ticket {
+ my $self = shift;
+ # well, 2 is wrong here but will have to do for now
+ popurl(2).'rt/'. $self->SUPER::href_new_ticket(@_);
+}
+
+sub href_ticket {
+ my $self = shift;
+ # well, 2 is wrong here but will have to do for now
+ popurl(2).'rt/'. $self->SUPER::href_ticket(@_);
}
1;