X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fprocess%2Fcust_main_note-import.cgi;h=efc6224d08f08cd4fbcd93682c10dfb63a0c0d87;hp=af06ae95ea0301fe473bdd0a0b7da609aaca49ca;hb=9f4b217a918ce2fd00138fb91f50ee21a2a77bae;hpb=ac0ffef1dd511febd1ffa851dfd8b3772b968b09

diff --git a/httemplate/misc/process/cust_main_note-import.cgi b/httemplate/misc/process/cust_main_note-import.cgi
index af06ae95e..efc6224d0 100644
--- a/httemplate/misc/process/cust_main_note-import.cgi
+++ b/httemplate/misc/process/cust_main_note-import.cgi
@@ -22,6 +22,10 @@ The following items <% $op eq 'Preview' ? 'would be' : 'were' %> imported.  (See
 </PRE>
   
 <%init>
+
+die "access denied"
+  unless $FS::CurrentUser::CurrentUser->access_right('Import');
+
 my $date = time;
 my $otaker = $FS::CurrentUser::CurrentUser->username;
 my $csv = new Text::CSV_XS;