summaryrefslogtreecommitdiff
path: root/FS/FS
diff options
context:
space:
mode:
authorMike Robinson <miker@freeside.biz>2012-05-01 12:32:53 -0500
committerMike Robinson <miker@freeside.biz>2012-05-01 12:32:53 -0500
commitb3f48204012dd722912dcb3703908bd1eaf6df7b (patch)
treeede23149c6ed27f415627db7a4ef93d79666ed8c /FS/FS
parent1e2473f03c0fb15f1e56dc09ea3a94c5e5525a53 (diff)
17528: back-date payment access-right
Diffstat (limited to 'FS/FS')
-rw-r--r--FS/FS/AccessRight.pm1
-rw-r--r--FS/FS/access_right.pm1
2 files changed, 2 insertions, 0 deletions
diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm
index 8a13ab3..a39fb37 100644
--- a/FS/FS/AccessRight.pm
+++ b/FS/FS/AccessRight.pm
@@ -188,6 +188,7 @@ tie my %rights, 'Tie::IxHash',
'Customer payment rights' => [
'View payments',
{ rightname=>'Post payment', desc=>'Make check or cash payments.' },
+ { rightname=>'Backdate payment', desc=>'Enable payments to be posted for days other than today.' },
'Post check payment',
'Post cash payment',
'Post payment batch',
diff --git a/FS/FS/access_right.pm b/FS/FS/access_right.pm
index 815c6d9..719577f 100644
--- a/FS/FS/access_right.pm
+++ b/FS/FS/access_right.pm
@@ -185,6 +185,7 @@ sub _upgrade_data { # class method
my %onetime = (
'List customers' => 'List all customers',
'List packages' => 'Summarize packages',
+ 'Post payment' => 'Backdate payment',
);
foreach my $old_acl ( keys %onetime ) {