From: Matt Birkholz <matt@birchwood-abbey.net>
Date: Thu, 28 Dec 2023 22:47:20 +0000 (-0700)
Subject: Add CA to the (sub)commands delegated to the small institute.
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=4b69cee3e0d0b8ce856bd97e43928c8284b8804e;p=Network

Add CA to the (sub)commands delegated to the small institute.
---

diff --git a/README.org b/README.org
index 4b0b0c0..15398af 100644
--- a/README.org
+++ b/README.org
@@ -3218,19 +3218,7 @@ The script begins with the following prefix and trampolines.
 
 use strict;
 
-if ($ARGV[0] eq "config") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "new") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "old") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "pass") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "client") {
+if (grep { $_ eq $ARGV[0] } qw(CA config new old pass client)) {
   exec "./Institute/inst", @ARGV;
 }
 #+END_SRC
diff --git a/abbey b/abbey
index db426cc..9f8ec93 100755
--- a/abbey
+++ b/abbey
@@ -4,19 +4,7 @@
 
 use strict;
 
-if ($ARGV[0] eq "config") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "new") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "old") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "pass") {
-  exec "./Institute/inst", @ARGV;
-}
-if ($ARGV[0] eq "client") {
+if (grep { $_ eq $ARGV[0] } qw(CA config new old pass client)) {
   exec "./Institute/inst", @ARGV;
 }