random nits for grandstream provisioning :UI, docs, java path, s/system/IPC::Run...

[freeside.git] / httemplate / search / cust_main-zip.html

diff --git a/httemplate/search/cust_main-zip.html b/httemplate/search/cust_main-zip.html
index 333a1e0..56df924 100644 (file)
--- a/httemplate/search/cust_main-zip.html
+++ b/httemplate/search/cust_main-zip.html
@@ -1,4 +1,17 @@
-<%
+<% include( 'elements/search.html',
+                 'title'       => 'Zip code Search Results',
+                 'name'        => 'zip codes',
+                 'query'       => $sql_query,
+                 'count_query' => $count_sql,
+                 'header'      => [ 'Zip code', 'Customers', ],
+                 #'fields'      => [ 'zip', 'num_cust', ],
+                 'links'       => [ '', sub { 'somewhere'; }  ],
+             )
+%>
+<%init>
+
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('List zip codes');
 
 # XXX link to customers
 
@@ -83,13 +96,4 @@ my $count_sql = "select count(distinct $czip) from cust_main $where";
 
 # XXX should link...
 
-%><%= include( 'elements/search.html',
-                 'title'       => 'Zip code Search Results',
-                 'name'        => 'zip codes',
-                 'query'       => $sql_query,
-                 'count_query' => $count_sql,
-                 'header'      => [ 'Zip code', 'Customers', ],
-                 #'fields'      => [ 'zip', 'num_cust', ],
-                 'links'       => [ '', sub { 'somewhere'; }  ],
-             )
-%>
+</%init>