diff options
author | ivan <ivan> | 2004-12-06 14:00:43 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-12-06 14:00:43 +0000 |
commit | dda497584a2e12907bba7cf07051fe34ede63b32 (patch) | |
tree | 55dc30fe82643f7d638da30e0bb23d7e94d2223a /FS/FS/TicketSystem/RT_Internal.pm | |
parent | b5ca5dd85a6b1eacdc0888aedecadb716e625ec3 (diff) |
1st try at adding custom field handling
Diffstat (limited to 'FS/FS/TicketSystem/RT_Internal.pm')
-rw-r--r-- | FS/FS/TicketSystem/RT_Internal.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/FS/FS/TicketSystem/RT_Internal.pm b/FS/FS/TicketSystem/RT_Internal.pm index ec0c3f7be..74006f577 100644 --- a/FS/FS/TicketSystem/RT_Internal.pm +++ b/FS/FS/TicketSystem/RT_Internal.pm @@ -2,6 +2,9 @@ package FS::TicketSystem::RT_Internal; use strict; use vars qw( @ISA ); +use FS::UID qw(dbh); +use FS::CGI qw(popurl); +use FS::TicketSystem::RT_Libs; @ISA = qw( FS::TicketSystem::RT_Libs ); @@ -13,5 +16,16 @@ sub sql_customer_tickets { )"; } +sub num_customer_tickets { + my( $self, $custnum, $priority ) = ( shift, shift, shift ); + $self->SUPER::new_customer_tickets( $custnum, $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(@_); +} + 1; |