diff --git a/include/extern.h b/include/extern.h
index 89f07f57a..b1b5901ae 100644
--- a/include/extern.h
+++ b/include/extern.h
@@ -1,4 +1,4 @@
-/* NetHack 3.6	extern.h	$NHDT-Date: 1594601903 2020/07/13 00:58:23 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.852 $ */
+/* NetHack 3.6	extern.h	$NHDT-Date: 1594635320 2020/07/13 10:15:20 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.853 $ */
 /* Copyright (c) Steve Creps, 1988.				  */
 /* NetHack may be freely redistributed.  See license for details. */
 
@@ -1514,7 +1514,6 @@ E void NDECL(kill_genocided_monsters);
 E void FDECL(golemeffects, (struct monst *, int, int));
 E boolean FDECL(angry_guards, (BOOLEAN_P));
 E void NDECL(pacify_guards);
-E struct monst *FDECL(find_ghost_with_name, (char *));
 E void FDECL(decide_to_shapeshift, (struct monst *, int));
 E boolean FDECL(vamp_stone, (struct monst *));
 
diff --git a/src/mon.c b/src/mon.c
index 96b12736a..0c1604f3b 100644
--- a/src/mon.c
+++ b/src/mon.c
@@ -1,4 +1,4 @@
-/* NetHack 3.6	mon.c	$NHDT-Date: 1593306909 2020/06/28 01:15:09 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.338 $ */
+/* NetHack 3.6	mon.c	$NHDT-Date: 1594635320 2020/07/13 10:15:20 $  $NHDT-Branch: NetHack-3.7 $:$NHDT-Revision: 1.339 $ */
 /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
 /*-Copyright (c) Derek S. Ray, 2015. */
 /* NetHack may be freely redistributed.  See license for details. */
@@ -4322,22 +4322,6 @@ pacify_guards()
     }
 }
 
-struct monst *
-find_ghost_with_name(str)
-char *str;
-{
-    struct monst *mtmp;
-
-    for (mtmp = fmon; mtmp; mtmp = mtmp->nmon) {
-        if (DEADMONSTER(mtmp)
-            || mtmp->data != &mons[PM_GHOST] || !has_mname(mtmp))
-            continue;
-        if (!strcmpi(MNAME(mtmp), str))
-            return mtmp;
-    }
-    return (struct monst *) 0;
-}
-
 void
 mimic_hit_msg(mtmp, otyp)
 struct monst *mtmp;