hedgewars/uSound.pas
changeset 6898 344b0dbd9690
parent 6862 87e060b69926
child 6990 40e5af28d026
equal deleted inserted replaced
6897:a9126661f613 6898:344b0dbd9690
   541     CurrentTeam^.voicepack:= AskForVoicepack(s)
   541     CurrentTeam^.voicepack:= AskForVoicepack(s)
   542 end;
   542 end;
   543 
   543 
   544 procedure initModule;
   544 procedure initModule;
   545 begin
   545 begin
   546     RegisterVariable('voicepack', vtCommand, @chVoicepack, false);
   546     RegisterVariable('voicepack', @chVoicepack, false);
   547     MusicFN:='';
   547     MusicFN:='';
   548 end;
   548 end;
   549 
   549 
   550 procedure freeModule;
   550 procedure freeModule;
   551 begin
   551 begin