show costs when ordering, RT#30462

diff --git a/FS/FS/AccessRight.pm b/FS/FS/AccessRight.pm
index 59edc90..0369374 100644 (file)
--- a/FS/FS/AccessRight.pm
+++ b/FS/FS/AccessRight.pm
@@ -154,6 +154,7 @@ tie my %rights, 'Tie::IxHash',
     'Waive setup fee', #NEW
     'View appointments', #NEWNEW
     'Make appointment',
+    'View package definition costs', #NEWNEW
   ],
   
   ###

diff --git a/FS/FS/access_right.pm b/FS/FS/access_right.pm
index 143cd62..42e7ed2 100644 (file)
--- a/FS/FS/access_right.pm
+++ b/FS/FS/access_right.pm
@@ -243,6 +243,7 @@ sub _upgrade_data { # class method
     'Configuration' => 'Alarm global configuration',
     'Edit global package definitions' => 'Edit package definition costs',
     'Configuration' => 'Edit global fee definitions',
+    'Edit package definition costs' => 'View package definition costs',
   );
 
 #  foreach my $old_acl ( keys %onetime ) {