From 827a359e2f666b8f0735402f670b8e41258e54b3 Mon Sep 17 00:00:00 2001
From: mark <mark>
Date: Fri, 10 Feb 2012 01:58:19 +0000
Subject: allow towers without sectors, #16398 continued

---
 httemplate/edit/tower.html | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'httemplate/edit')

diff --git a/httemplate/edit/tower.html b/httemplate/edit/tower.html
index c27d9d255..5a0f2a8ce 100644
--- a/httemplate/edit/tower.html
+++ b/httemplate/edit/tower.html
@@ -4,6 +4,8 @@
      viewall_dir   => 'browse',
      fields        => [ 'towername',
                         { field=>'disabled', type=>'checkbox', value=>'Y', },
+                        { field             => 'default_ip_addr',
+                          curr_value_callback => $default_ip_addr_callback },
                         { field             => 'sectornum',
                           type              => 'tower_sector',
                           o2m_table         => 'tower_sector',
@@ -15,6 +17,7 @@
                         'towername' => 'Name',
                         'sectornum' => 'Sector',
                         'disabled'  => 'Disabled',
+                        'default_ip_addr' => 'Tower IP address',
                       },
 &>
 <%init>
@@ -34,4 +37,10 @@ my $m2_error_callback = sub { # reconstruct the list
   } grep /^sectornum\d+$/, ($cgi->param);
 };
 
+my $default_ip_addr_callback = sub {
+  my ($cgi, $object) = @_;
+  my $sector = $object ? $object->default_sector : '';
+  $sector ? $sector->ip_addr : '';
+};
+
 </%init>
-- 
cgit v1.2.1