diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-03-03 16:39:31 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-03-03 16:39:31 -0800 |
| commit | b216bf3a4a3e9646fb80002718b6aa1ae2687354 (patch) | |
| tree | 85e43283a5dc383715198891aa80bfcdcfbaf12a | |
| parent | c8666a392471849f3b945eb44f7c9f838686ad0a (diff) | |
fix contact upgrade, RT#39659
| -rw-r--r-- | FS/FS/contact.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/FS/FS/contact.pm b/FS/FS/contact.pm index c1b558d6c..2f9b339e8 100644 --- a/FS/FS/contact.pm +++ b/FS/FS/contact.pm @@ -741,6 +741,12 @@ sub firstlast { # $contact_class->classname; #} +#autoloaded by FK in 4.x, but not during the upgrade +sub contact_email { + my $self = shift; + qsearch('contact_email', { 'contactnum' => $self->contactnum } ); +} + =item by_selfservice_email EMAILADDRESS Alternate search constructor (class method). Given an email address, |