X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAccessRight.pm;h=3f2c0f35d468c1a44b13486199235471c70e9f93;hb=15a4e1674694b76ecc2af87de479aabe370ac03d;hp=0493edd338e124799f9fa2e7ec4984691ef46b12;hpb=6de4864902314891cfabcd0adae758854114b1c7;p=freeside.git diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm index 0493edd33..3f2c0f35d 100644 --- a/FS/FS/AccessRight.pm +++ b/FS/FS/AccessRight.pm @@ -184,7 +184,6 @@ tie my %rights, 'Tie::IxHash', 'Resend invoices', #NEWNEW 'Void invoices', 'Unvoid invoices', - 'Delete invoices', 'View customer tax exemptions', #yow 'Edit customer tax exemptions', #NEWNEW 'Add customer tax adjustment', #new, but no need to phase in @@ -224,7 +223,7 @@ tie my %rights, 'Tie::IxHash', 'Void credit', #NEWER than things marked NEWNEWNEW 'Unvoid credit', #NEWER than things marked NEWNEWNEW { rightname=>'Unapply credit', desc=>'Enable "unapplication" of unclosed credits.' }, #aka unapplycredits - { rightname=>'Delete credit', desc=>'Enable deletion of unclosed credits. Be very careful! Only delete credits that were data-entry errors, not adjustments.' }, #aka. deletecredits Optionally specify one or more comma-separated email addresses to be notified when a credit is deleted. + { rightname=>'Delete credit', desc=>'Enable deletion of unclosed credits. Be very careful! Only delete credits that were data-entry errors, not adjustments.' }, 'View refunds', { rightname=>'Post refund', desc=>'Enable posting of check and cash refunds.' }, 'Post check refund', @@ -289,6 +288,7 @@ tie my %rights, 'Tie::IxHash', 'Billing event reports', 'Receivables report', 'Financial reports', + { rightname=>'Send reports to customers', global=>1 }, { rightname=> 'List inventory', global=>1 }, { rightname=>'View email logs', global=>1 }, { rightname=>'View system logs' }, @@ -441,7 +441,6 @@ Most (but not all) right names. sub default_superuser_rights { my $class = shift; my %omit = map { $_=>1 } ( - 'Delete invoices', 'Delete payment', 'Delete credit', #? 'Delete refund', #?