diff --git a/doc/fixes3-7-0.txt b/doc/fixes3-7-0.txt
index 07e627a95..013fa16c7 100644
--- a/doc/fixes3-7-0.txt
+++ b/doc/fixes3-7-0.txt
@@ -119,7 +119,7 @@ tribute (Discworld snippets) typos, in book order rather than fix order:
 	 #12 "or" -> "of", #14 second instance of "megalomaniac" misspelled
 	Lords and Ladies passage #5, near end add missing opening double
 	 quote, passage #6 first footnote, insert omitted "be", passage #7
-	last paragraph, "to" -> "be"
+	 last paragraph, "to" -> "be"
 	Men at Arms passage #1, italicize /for/, passage #2, insert omitted
 	 word "had": 'it was /fate/ that _had_ let Edward'
 	Interesting Times passage #1, italicize several words
diff --git a/src/priest.c b/src/priest.c
index a46cc4078..8308a96e6 100644
--- a/src/priest.c
+++ b/src/priest.c
@@ -314,7 +314,8 @@ priestname(
     if (!mon->ispriest && !mon->isminion) /* should never happen...  */
         return strcpy(pname, what);       /* caller must be confused */
 
-    /* this was done near the end but we want 'what' to be updated sooner */
+    /* for high priest(ess), "high" (or "grand" for poohbah) will be inserted
+       [this was done near the end but we want 'what' to be updated sooner] */
     if (mon->ispriest || aligned_priest || high_priest)
         what = do_hallu ? "poohbah" : mon->female ? "priestess" : "priest";
 
@@ -324,8 +325,9 @@ priestname(
             article = ARTICLE_THE;
         if (article == ARTICLE_THE) {
             Strcpy(pname, "the ");
-        } else if (!strncmpi(what, "Angel ", 6)) {
-            /* bypass just_an(); it would yield "the " due to capital A */
+        } else if (!strcmp(what, "Angel")) {
+            /* bypass just_an(); it would yield "" due to treating capital A
+               as indicating a personal name */
             Strcpy(pname, "an ");
         } else {
             (void) just_an(pname, what);