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