debug commands: lightsources and monpolycontrol

Given no objections to Pat's suggestion, putting back in the change to make
the newest debug commands consistent with the others, removing the space
from the former and the underscore from the latter.

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

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

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},