Sort sub-zones on zone pages

closes #52
abh · Feb 19, 2015 · 60b19a9 · 60b19a9
1 parent ebd0539
commit 60b19a9
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/docs/ntppool/tpl/zone.html b/docs/ntppool/tpl/zone.html
@@ -110,9 +110,9 @@ <h4>IP[% ip_version %]</h4>
 	  END;
 	%]
 
-	[% IF zone.zones %]
+	[% IF zone.children %]
 	<p>
-	[% FOR child = zone.zones %]
+	[% FOR child = zone.children %]
 	<a href="[% child.url %][% show_servers ? '?show_servers=1' : '' %]">[% child.description %]</a> &#8212; [% child.fqdn %] ([% child.server_count %])<br />
 
 	[% END %]

diff --git a/lib/NP/Model/Zone.pm b/lib/NP/Model/Zone.pm
@@ -40,9 +40,9 @@ sub graph_path {
     return "$rrd_path/graph/" . $file;
 }
 
-
 sub children {
-    shift->zones;
+    my $self = shift;
+    return $self->{_children} ||= [ sort { $a->name cmp $b->name } $self->zones ];
 }
 
 sub random_subzone_ids {