Add an acl show command to the front end that calls the appropriate

Wallet::Server method.

1 files changed, 12 insertions, 0 deletions

diff --git a/server/wallet-backend b/server/wallet-backend
index 015c035..8777990 100755
--- a/server/wallet-backend
+++ b/server/wallet-backend
@@ -77,6 +77,14 @@ sub command {
         } elsif ($action eq 'rename') {
             check_args (2, [], @args);
             $server->acl_rename (@args) or die $server->error;
+        } elsif ($action eq 'show') {
+            check_args (1, [], @args);
+            my $output = $server->acl_show (@args);
+            if (defined $output) {
+                print $output;
+            } else {
+                die $server->error;
+            }
         } else {
             die "unknown command acl $action\n";
         }
@@ -234,6 +242,10 @@ accidental lockout, but administrators can remove themselves from the
 C<ADMIN> ACL and can leave only a non-functioning entry on the ACL.  Use
 caution when removing entries from the C<ADMIN> ACL.
 
+=item acl show <id>
+
+Display the name, numeric ID, and entries of the ACL <id>.
+
 =item create <type> <name>
 
 Create a new object of type <type> with name <name>.  With some backends,