--- a/hedgewars/uVisualGears.pas	Fri Apr 24 16:50:26 2009 +0000
+++ b/hedgewars/uVisualGears.pas	Fri Apr 24 16:53:38 2009 +0000
@@ -264,7 +264,7 @@
 		exit
 		end;
 
-if cReducedQuality then
+if cReducedQuality and (Kind <> vgtTeamHealthSorter) then
 	begin
 	AddVisualGear:= nil;
 	exit