optimize CDR rating after timed rate perf regression, RT#15739

[freeside.git] / httemplate / edit / reason.html

diff --git a/httemplate/edit/reason.html b/httemplate/edit/reason.html
index 512013a..620a2ea 100644 (file)
--- a/httemplate/edit/reason.html
+++ b/httemplate/edit/reason.html
@@ -42,3 +42,9 @@
                  'viewall_url' => $p . "browse/reason.html?class=$class",
            )
 %>
+<%init>
+
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
+
+</%init>