diff --git a/kernel/fcbfns.c b/kernel/fcbfns.c
index 5fa50bb..8f67bcc 100644
--- a/kernel/fcbfns.c
+++ b/kernel/fcbfns.c
@@ -477,7 +477,7 @@ UBYTE FcbDelete(xfcb FAR * lpXfcb)
   void FAR *lpOldDta = dta;
 
   /* Build a traditional DOS file name                            */
-  fcb FAR *lpFcb = CommonFcbInit(lpXfcb, SecPathName, &FcbDrive);
+  CommonFcbInit(lpXfcb, SecPathName, &FcbDrive);
   /* check for a device                                           */
   if (IsDevice(SecPathName))
   {