DNA panel fixed, update changelog.

Conflicts:
	html/changelog.html

code/modules/admin/admin.dm

@@ -131,7 +131,8 @@ var/global/floorIsLava = 0
 					bname = assigned_blocks[block]
 					body += "<td>"
 					if(bname)
-						var/bcolor="[(block in M.mutations)?"#006600":"#ff0000"]"
+						var/bstate=M.dna.GetSEState(block)
+						var/bcolor="[(bstate)?"#006600":"#ff0000"]"
 						body += "<A href='?src=\ref[src];togmutate=\ref[M];block=[block]' style='color:[bcolor];'>[bname]</A><sub>[block]</sub>"
 					else
 						body += "[block]"

code/modules/admin/topic.dm

@@ -1299,9 +1299,11 @@
 		if(!istype(H))
 			usr << "This can only be used on instances of type /mob/living/carbon/human"
 			return
-		usr.client.cmd_admin_toggle_block(H,text2num(href_list["block"]))
+		var/block=text2num(href_list["block"])
+		//testing("togmutate([href_list["block"]] -> [block])")
+		usr.client.cmd_admin_toggle_block(H,block)
 		show_player_panel(H)
-		H.regenerate_icons()
+		//H.regenerate_icons()
 
 /***************** BEFORE**************
 

code/modules/admin/verbs/debug.dm

@@ -1029,15 +1029,12 @@ But you can call procs that are of type /mob/living/carbon/human/proc/ for that
 			usr << list2text(respawnable_list,",")
 
 
-/client/proc/cmd_admin_toggle_block(var/mob/M in mob_list,var/block)
-	set category = "Fun"
-	set name = "Toggle a DNA Block"
-
+/client/proc/cmd_admin_toggle_block(var/mob/M,var/block)
 	if(!ticker)
 		alert("Wait until the game starts")
 		return
 	if(istype(M, /mob/living/carbon))
-		M.dna.SetSEState(!M.dna.GetSEState(block))
+		M.dna.SetSEState(block,!M.dna.GetSEState(block))
 		domutcheck(M,null)
 		M.update_mutations()
 		var/state="[M.dna.GetSEState(block)?"on":"off"]"