$NetBSD: patch-ah,v 1.4 2007/05/31 13:01:54 adam Exp $

--- unix/tclUnixFCmd.c.orig	2007-04-29 04:19:51.000000000 +0200
+++ unix/tclUnixFCmd.c
@@ -631,6 +631,14 @@ TclpDeleteFile(path)
  *---------------------------------------------------------------------------
  */
 
+/* Reintroduced here for the benefit of scotty */
+int
+TclpCreateDirectory(path)
+    CONST char *path;
+{
+    return DoCreateDirectory(path);
+}
+
 int 
 TclpObjCreateDirectory(pathPtr)
     Tcl_Obj *pathPtr;