diff --git a/src/port/copydir.c b/src/port/copydir.c
index f2b150d15e9c0ae84f746b1b103bd03910274a1f..43fd9359c595b1816c19e40d7b3ea591e1564a29 100644
--- a/src/port/copydir.c
+++ b/src/port/copydir.c
@@ -11,7 +11,7 @@
  *	as a service.
  *
  * IDENTIFICATION
- *	  $PostgreSQL: pgsql/src/port/copydir.c,v 1.28 2010/02/15 11:40:49 stark Exp $
+ *	  $PostgreSQL: pgsql/src/port/copydir.c,v 1.29 2010/02/22 00:11:05 stark Exp $
  *
  *-------------------------------------------------------------------------
  */
@@ -90,10 +90,12 @@ copydir(char *fromdir, char *todir, bool recurse)
 		else if (S_ISREG(fst.st_mode))
 			copy_file(fromfile, tofile);
 	}
+	Free(xldir);
 
 	/*
 	 * Be paranoid here and fsync all files to ensure we catch problems.
 	 */
+	AllocateDir(fromdir);
 	if (xldir == NULL)
 		ereport(ERROR,
 				(errcode_for_file_access(),