GetDir() Problem: ALLOC xxxxxxxx

void CHTMLContainer::SetListData()
    {
    MDesCArray* itemArray = iList->Model()->ItemTextArray();
CDesCArray* itemList = static_cast<CDesCArray*>(itemArray);

TUint a;
TText tItem;

// connect to the file server
RFs fileSession;
CDir* dirList;
TBuf<30> fileName;
TInt stat;

_LIT(KDirName, "C:\\Symbian\\8.0a\\S60_2nd_FP2\\epoc32\\wins\\c\\Nokia\\MyTindahan\\web");
_LIT(KFileSpec,"C:\\Symbian\\8.0a\\S60_2nd_FP2\\epoc32\\wins\\c\\Nokia\\MyTindahan\\web\\*");

// Connect to the file server
stat = fileSession.Connect();

// Get the file list, sorted by name (Leave if an error occurs)
         User::LeaveIfError( fileSession.GetDir(KFileSpec,
KEntryAttMaskSupported,
ESortByName,
dirList));  // [glow=red,2,300]<----- Memory leak error here.[/glow]

// Close the connection with the file server
fileSession.Close();

// Dynamically build list

itemList->Delete(0);

for (TInt a=0; a < dirList->Count(); a++) {
fileName = (*dirList)[a].iName;
itemList->AppendL(fileName);
}

delete dirList;

iList->HandleItemAdditionL(); 
}