projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
86eb93c
)
RT# 73422 Contact report - fix customer link
author
Mitch Jackson
<mitch@freeside.biz>
Sun, 28 Oct 2018 19:28:37 +0000
(15:28 -0400)
committer
Mitch Jackson
<mitch@freeside.biz>
Sun, 28 Oct 2018 19:28:37 +0000
(15:28 -0400)
httemplate/search/contact.html
patch
|
blob
|
history
diff --git
a/httemplate/search/contact.html
b/httemplate/search/contact.html
index
50935ba
..
4b3fe83
100644
(file)
--- a/
httemplate/search/contact.html
+++ b/
httemplate/search/contact.html
@@
-195,12
+195,15
@@
my @report = (
$rec->cust_contact_message_dest ? 'Y' : 'N';
}},
{ label => 'Customer',
$rec->cust_contact_message_dest ? 'Y' : 'N';
}},
{ label => 'Customer',
- link => sub {
- my $rec = shift;
- $rec->cust_main_custnum
- ? ["${p}view/cust_main.cgi?", 'cust_main_custnum' ]
- : ["${p}view/prospect_main.html?", 'prospect_main_prospectnum' ];
- },
+ link => [
+ "${fsurl}view/",
+ sub {
+ my $row = shift;
+ $row->cust_contact_custnum
+ ? 'cust_main.cgi?'.$row->cust_contact_custnum
+ : 'prospect_main.html?'.$row->prospect_contact_prospectnum
+ }
+ ],
field => sub {
my $rec = shift;
if ($rec->prospect_contact_prospectnum) {
field => sub {
my $rec = shift;
if ($rec->prospect_contact_prospectnum) {