diff --git a/src/priest.c b/src/priest.c
index 21350e71b..ae55e5787 100644
--- a/src/priest.c
+++ b/src/priest.c
@@ -347,7 +347,7 @@ priestname(
             ; /* polymorphed priest; use ``what'' as is */
         } else {
             if (high_priest)
-                Strcat(pname, "high ");
+                Strcat(pname, Hallucination ? "grand " : "high ");
             if (Hallucination)
                 what = "poohbah";
             else if (mon->female)