summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--UI/Contact/contact.html2
-rw-r--r--t/04-template-handling.t5
2 files changed, 7 insertions, 0 deletions
diff --git a/UI/Contact/contact.html b/UI/Contact/contact.html
index 83d63c1a..070b6713 100644
--- a/UI/Contact/contact.html
+++ b/UI/Contact/contact.html
@@ -616,12 +616,14 @@ problems with multi-word single-quoted constructs in PI tags. -CT -->
<table width="100%">
<tr class="listheading">
<th class="contact_class"><?lsmb text('Type:') ?></th>
+ <th class="description"><?lsmb text('Description:') ?></th>
<th class="contact"><?lsmb text('Contact Info:') ?></th>
<th class="contact_actions"><?lsmb text('Actions:') ?></th>
</tr>
<?lsmb FOREACH ct = contacts ?>
<tr>
<td class="contact_class"><?lsmb ct.class ?></td>
+ <td class="description"><?lsmb ct.description ?></td>
<td class="contact"><?lsmb ct.contact ?></td>
<td class="contact_actions">
<a href="<?lsmb tt_url(script)
diff --git a/t/04-template-handling.t b/t/04-template-handling.t
index 49f67bf2..704969c6 100644
--- a/t/04-template-handling.t
+++ b/t/04-template-handling.t
@@ -393,10 +393,14 @@ my $contact_request = {
entity_id => 1,
control_code => 'test1',
meta_number => 'test1',
+ credit_id => '1',
entity_class => 1,
credit_list => [{ entity_class => 1,
meta_number => 'test1',
}],
+ contacts => [{contact => 'ctest1',
+ description => 'dtest1',
+ contact_class => '1'}],
business_id => 1000,
business_types => [{ id => 1, description => 'test1' },
{ id => 1000, description => 'test2' }],
@@ -415,6 +419,7 @@ $contact_template->render($contact_request);
my @output = get_output_line_array($contact_template);
is(grep (/value="1" selected/, @output), 0, 'Select box Value 1 unselected');
is(grep (/value="1000" selected/, @output), 1, 'Select box Value 1000 selected');
+is(grep (/<td class="description">dtest1/, @output), 1, 'Contact description shows');
# Functions