DEADSOFTWARE

dfwad: fix error code on resource read
authorDeaDDooMER <deaddoomer@deadsoftware.ru>
Thu, 9 Nov 2023 12:27:27 +0000 (15:27 +0300)
committerDeaDDooMER <deaddoomer@deadsoftware.ru>
Thu, 9 Nov 2023 12:27:27 +0000 (15:27 +0300)
src/shared/WADEDITOR_dfwad.pas

index 0fe16f51e1dc7c33d74bc53ee7a7be62d8c0162d..b8de439d9d38cf500f43e36027734eabf283fde0 100644 (file)
@@ -534,6 +534,7 @@ implementation
                 pData := ptr;
                 Len := size;
                 Result := True;
+                FLastError := DFWAD_NOERROR;
               except
                 FreeMem(ptr);
                 raise;
@@ -547,6 +548,7 @@ implementation
                 pData := ptr;
                 Len := p.data.usize;
                 Result := True;
+                FLastError := DFWAD_NOERROR;
               except
                 FreeMem(ptr);
                 raise;