equal
deleted
inserted
replaced
735 SendIPCRaw(@s[0], Length(s) + 1) |
735 SendIPCRaw(@s[0], Length(s) + 1) |
736 end; |
736 end; |
737 |
737 |
738 procedure initModule; |
738 procedure initModule; |
739 begin |
739 begin |
740 RegisterVariable('landcheck', vtCommand, @chLandCheck, false); |
740 RegisterVariable('landcheck', @chLandCheck, false); |
741 RegisterVariable('sendlanddigest', vtCommand, @chSendLandDigest, false); |
741 RegisterVariable('sendlanddigest', @chSendLandDigest, false); |
742 |
742 |
743 LandBackSurface:= nil; |
743 LandBackSurface:= nil; |
744 digest:= ''; |
744 digest:= ''; |
745 |
745 |
746 if (cReducedQuality and rqBlurryLand) = 0 then |
746 if (cReducedQuality and rqBlurryLand) = 0 then |