--- a/hedgewars/uCommandHandlers.pas	Wed Dec 22 04:09:56 2010 +0100
+++ b/hedgewars/uCommandHandlers.pas	Wed Dec 22 00:17:43 2010 -0500
@@ -407,6 +407,7 @@
 if isDeveloperMode then
 begin
 Pathz[ptCurrTheme]:= Pathz[ptThemes] + '/' + s;
+Theme:= s;
 InitStepsFlags:= InitStepsFlags or cifTheme
 end
 end;