X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fsfs%2FsfsZipFS.pas;h=e5e996841f803b4888dddd5a8467e5105ded8196;hb=740d7afa7f55039dd9da808af96e18e0490c3307;hp=ae17ba10a8b55970fac0febf3c0a62fd862ef417;hpb=dd0d8ac4cc2a0aa774f25c8a1a774f7358acfae7;p=d2df-sdl.git diff --git a/src/sfs/sfsZipFS.pas b/src/sfs/sfsZipFS.pas index ae17ba1..e5e9968 100644 --- a/src/sfs/sfsZipFS.pas +++ b/src/sfs/sfsZipFS.pas @@ -1,4 +1,4 @@ -(* Copyright (C) DooM 2D:Forever Developers +(* Copyright (C) Doom 2D: Forever Developers * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -19,6 +19,7 @@ // {.$DEFINE SFS_DEBUG_ZIPFS} {$INCLUDE ../shared/a_modes.inc} +{$SCOPEDENUMS OFF} {.$R+} unit sfsZipFS; @@ -416,7 +417,9 @@ begin result := StrEquCI1251(prefix, 'zip') or StrEquCI1251(prefix, 'pk3') or - StrEquCI1251(prefix, 'dfwad'); + StrEquCI1251(prefix, 'dfz') or + StrEquCI1251(prefix, 'dfwad') or + StrEquCI1251(prefix, 'dfzip'); end; procedure TSFSZipVolumeFactory.Recycle (vol: TSFSVolume);