Show Gutenberg files as "Gutenb" in the content list

This commit is contained in:
Andy McFadden 2015-01-09 18:36:05 -08:00
parent 1362c73a7e
commit 125d128b36
1 changed files with 3 additions and 1 deletions

View File

@ -1032,9 +1032,11 @@ int DiskArchive::LoadDiskFSContents(DiskFS* pDiskFS, const WCHAR* volName)
case DiskImg::kFormatDOS33:
case DiskImg::kFormatDOS32:
case DiskImg::kFormatUNIDOS:
case DiskImg::kFormatGutenberg:
pNewEntry->SetFormatStr(L"DOS");
break;
case DiskImg::kFormatGutenberg:
pNewEntry->SetFormatStr(L"Gutenb");
break;
case DiskImg::kFormatProDOS:
pNewEntry->SetFormatStr(L"ProDOS");
break;