TNT explosions deal punch damage

mods/ITEMS/mcl_throwing/init.lua

@@ -338,7 +338,7 @@ local pearl_on_step = function(self, dtime)
 				local oldpos = player:get_pos()
 				-- Teleport and hurt player
 				player:set_pos(telepos)
-				player:set_hp(player:get_hp() - 5, { type = "fall", origin = "mod" })
+				player:set_hp(player:get_hp() - 5, { type = "fall", from = "mod" })
 
 				-- 5% chance to spawn endermite at the player's origin
 				local r = math.random(1,20)

mods/ITEMS/mcl_tnt/init.lua

@@ -38,7 +38,7 @@ local function do_tnt_physics(tnt_np,tntr)
                         mcl_death_messages.player_damage(obj, S("@1 was caught in an explosion.", obj:get_player_name()))
                     end
                 end
-                obj:set_hp(obj:get_hp() - damage)
+                obj:set_hp(obj:get_hp() - damage, { type = "punch", from = "mod" })
             end
         end
     end