diff --git a/dat/wizhelp b/dat/wizhelp
index fd81c6939..788ececba 100644
--- a/dat/wizhelp
+++ b/dat/wizhelp
@@ -11,8 +11,8 @@ Debug-Mode Quick Reference:
 ^X  ==  show attributes including intrinsic attributes.
 
 #levelchange == change experience level
-#light sources == show mobile light sources
-#monpoly_control == control monster polymorphs
+#lightsources == show mobile light sources
+#monpolycontrol == control monster polymorphs
 #panic == panic test
 #poly == polymorph self
 #seenv == show seen vectors
diff --git a/doc/fixes34.1 b/doc/fixes34.1
index 7e4550723..bdff0262d 100644
--- a/doc/fixes34.1
+++ b/doc/fixes34.1
@@ -278,6 +278,8 @@ don't display the "intones:" prefix when !soundok since the message suffix
 	won't be displayed in this case
 document "sound" option in Guidebook
 destroy traps that are buried by boulders dropped in water
+renamed debug commands: light sources -> lightsources,
+	monpoly_control -> monpolycontrol
 
 
 Platform- and/or Interface-Specific Fixes
diff --git a/src/cmd.c b/src/cmd.c
index e600477ec..247981363 100644
--- a/src/cmd.c
+++ b/src/cmd.c
@@ -1486,8 +1486,8 @@ struct ext_func_tab extcmdlist[] = {
 #if defined(WIZARD)
 static const struct ext_func_tab debug_extcmdlist[] = {
 	{"levelchange", "change experience level", wiz_level_change, TRUE},
-	{"light sources", "show mobile light sources", wiz_light_sources, TRUE},
-	{"monpoly_control", "control monster polymorphs", wiz_mon_polycontrol, TRUE},
+	{"lightsources", "show mobile light sources", wiz_light_sources, TRUE},
+	{"monpolycontrol", "control monster polymorphs", wiz_mon_polycontrol, TRUE},
 	{"panic", "test panic routine (fatal to game)", wiz_panic, TRUE},
 	{"poly", "polymorph self", wiz_polyself, TRUE},
 	{"seenv", "show seen vectors", wiz_show_seenv, TRUE},