X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_gui.pas;h=9319e45a7b9e29550da578fa07bf4af5ac32dc25;hb=af3c404e11867c6794975f1d45dd98932d804ede;hp=973def68744420d3359986567bba3bc8808ed8cc;hpb=ac201b02f10ef558087d50f6b03b4519ab567558;p=d2df-sdl.git diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas index 973def6..9319e45 100644 --- a/src/game/g_gui.pas +++ b/src/game/g_gui.pas @@ -2469,12 +2469,12 @@ var panels: TPanelsRec1Array; header: TMapHeaderRec_1; a: Integer; - FileName, SectionName, ResName: string; + FileName: string; Data: Pointer; Len: Integer; rX, rY: Single; begin - g_ProcessResourceStr(Res, FileName, SectionName, ResName); + FileName := g_ExtractWadName(Res); WAD := TWADFile.Create(); if not WAD.ReadFile(FileName) then @@ -2483,7 +2483,8 @@ begin Exit; end; - if not WAD.GetResource('', ResName, Data, Len) then + //k8: ignores path again + if not WAD.GetResource(g_ExtractFileName(Res), Data, Len) then begin WAD.Free(); Exit;