From 3dc3d70ebcca73da73f95acd86594e9c5443d4ef Mon Sep 17 00:00:00 2001
From: spaette <spaette@outlook.com>
Date: Fri, 6 Jan 2023 12:35:59 -0600
Subject: [PATCH] typos

---
 contrib/non-profit-audit-reports/fund-report.plx     | 4 ++--
 contrib/non-profit-audit-reports/summary-reports.plx | 8 ++++----
 test/regress/786A3DD0.test                           | 2 +-
 test/regress/89233B6D-a.dat                          | 2 +-
 test/regress/89233B6D-b.dat                          | 2 +-
 test/regress/89233B6D.test                           | 2 +-
 6 files changed, 10 insertions(+), 10 deletions(-)

diff --git a/contrib/non-profit-audit-reports/fund-report.plx b/contrib/non-profit-audit-reports/fund-report.plx
index ce59da96b..65de85f73 100755
--- a/contrib/non-profit-audit-reports/fund-report.plx
+++ b/contrib/non-profit-audit-reports/fund-report.plx
@@ -133,7 +133,7 @@ my %tot;
 my %beforeEndings = ('Income' => 1, 'Expenses' => 1);
 my %afterEndings;
 
-# For other @possibleTypes, build up @fieldsList to just thoes that are present. 
+# For other @possibleTypes, build up @fieldsList to just those that are present. 
 
 foreach my $fund (keys %funds) {
   foreach my $type (@possibleTypes) {
@@ -216,7 +216,7 @@ foreach my $fund (sort {
     $tot{$type} += $funds{$fund}{$type};
   }
   print "\n";
-  # Santity check:
+  # Sanity check:
   if (abs($funds{$fund}{ending} -
       ($funds{$fund}{starting}
          - $funds{$fund}{Income} - $funds{$fund}{Expenses}))
diff --git a/contrib/non-profit-audit-reports/summary-reports.plx b/contrib/non-profit-audit-reports/summary-reports.plx
index bf3abc4a4..d7626bf50 100755
--- a/contrib/non-profit-audit-reports/summary-reports.plx
+++ b/contrib/non-profit-audit-reports/summary-reports.plx
@@ -218,7 +218,7 @@ my %incomeGroups = ('INTEREST INCOME' => { args => ['/^Income.*Interest/' ] },
                     'CONFERENCES, RELATED BUSINESS INCOME' => { args => [ '/^Income.*(Conferences?:.*Sponsor|Booth|RBI)/'] },
                     'LICENSE COMPLIANCE' => { args => [ '/^Income.*(Enforce|Compliance)/' ]},
                     'TRADEMARKS' => {args => [ '/^Income.*Trademark/' ]},
-                    'ADVERSITING' => {args => [ '/^Income.*Advertising/' ]});
+                    'ADVERTISING' => {args => [ '/^Income.*Advertising/' ]});
 
 my @otherArgs;
 foreach my $type (keys %incomeGroups) {
@@ -267,7 +267,7 @@ my $overallTotal = $ZERO;
 $formatStrTotal = "\"%-90s\",\"\$%14s\"\n";
 foreach my $type ('DONATIONS', 'LICENSE COMPLIANCE',
                   'CONFERENCES, REGISTRATION', 'CONFERENCES, RELATED BUSINESS INCOME',
-                  'BOOK ROYALTIES & AFFILIATE PROGRAMS', 'ADVERSITING',
+                  'BOOK ROYALTIES & AFFILIATE PROGRAMS', 'ADVERTISING',
                   'TRADEMARKS', 'INTEREST INCOME', 'OTHER') {
   next if ($incomeGroups{$type}{output} =~ /^\s*$/ and $incomeGroups{$type}{total} == $ZERO);
   print INCOME "\n\"$type\"\n",
@@ -296,7 +296,7 @@ my %expenseGroups = ('BANKING FEES' => { regex => '^Expenses.*(Banking Fees|Curr
                     'SOFTWARE DEVELOPMENT' => { regex =>  '^Expenses.*Development' },
                     'OTHER PROGRAM ACTIVITY' => {regex =>  '^Expenses.*Gould' },
                     'ADVOCACY AND PROMOTION' => {regex =>  '^Expenses.*(Slipstream|Advocacy Merchandise|Promotional)' },
-                    'ADVERSITING' => {regex =>  '^Expenses.*Advertising' });
+                    'ADVERTISING' => {regex =>  '^Expenses.*Advertising' });
 
 foreach my $type (keys %expenseGroups, 'TRAVEL') {
   $expenseGroups{$type}{total} = $ZERO;
@@ -360,7 +360,7 @@ foreach my $key (keys %expenseGroups) {
 foreach my $type ('PAYROLL', 'SOFTWARE DEVELOPMENT', 'LICENSE COMPLIANCE', 'CONFERENCES',
                   'DEVELOPER MENTORING', 'TRAVEL', 'BANKING FEES', 'ADVOCACY AND PROMOTION',
                   'COMPUTING, HOSTING AND EQUIPMENT', 'ACCOUNTING',
-                  'OFFICE', 'RENT', 'ADVERSITING', 'OTHER PROGRAM ACTIVITY', 'OTHER') {
+                  'OFFICE', 'RENT', 'ADVERTISING', 'OTHER PROGRAM ACTIVITY', 'OTHER') {
   delete $verifyAllGroups{$type};
 
   die "$type is not defined!" if not defined $expenseGroups{$type};
diff --git a/test/regress/786A3DD0.test b/test/regress/786A3DD0.test
index 051f63829..d0c4aabad 100644
--- a/test/regress/786A3DD0.test
+++ b/test/regress/786A3DD0.test
@@ -9,7 +9,7 @@ D 1000.00 EUR
     Expenses:Banking:Fees                   USD 2.50
     Assets:Chequing                      CAD -203.42
     Epenses:Banking:Fees                    CAD 2.00
-    Assets:Chqeuing                        CAD -2.00
+    Assets:Chequing                        CAD -2.00
 
 test pricedb
 P 2011/02/27 00:00:00 AUD 0.746 EUR
diff --git a/test/regress/89233B6D-a.dat b/test/regress/89233B6D-a.dat
index 01d00e9a7..a1e31c907 100644
--- a/test/regress/89233B6D-a.dat
+++ b/test/regress/89233B6D-a.dat
@@ -1,4 +1,4 @@
 1994/01/02 * Salary
-    Asssets:Bank:Checking               200.00
+    Assets:Bank:Checking               200.00
     Income:Salary                      -200.00
 
diff --git a/test/regress/89233B6D-b.dat b/test/regress/89233B6D-b.dat
index f54dc66f6..c7d81b466 100644
--- a/test/regress/89233B6D-b.dat
+++ b/test/regress/89233B6D-b.dat
@@ -1,4 +1,4 @@
 1994/01/02 * Rent
     Expenses:Rent                       100.00
-    Asssets:Bank:Checking              -100.00
+    Assets:Bank:Checking              -100.00
 
diff --git a/test/regress/89233B6D.test b/test/regress/89233B6D.test
index e6bd38f59..d446da948 100644
--- a/test/regress/89233B6D.test
+++ b/test/regress/89233B6D.test
@@ -7,7 +7,7 @@
 !end
 
 test reg "^A:"
-94-Jan-02 Salary                A:Assset:Bank:Checking          200          200
+94-Jan-02 Salary                A:Assets:Bank:Checking          200          200
                                 A:Income:Salary                -200            0
 end test