From fa378f1c65892a20898177e93d89a3ca2d55e505 Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Wed, 12 Jun 2002 15:05:20 +0000
Subject: Made this file compile!

---
 unix/tclUnixFile.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c
index 2fd7b11..cdd6697 100644
--- a/unix/tclUnixFile.c
+++ b/unix/tclUnixFile.c
@@ -9,7 +9,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclUnixFile.c,v 1.21 2002/06/12 09:28:58 vincentdarley Exp $
+ * RCS: @(#) $Id: tclUnixFile.c,v 1.22 2002/06/12 15:05:20 dkf Exp $
  */
 
 #include "tclInt.h"
@@ -728,9 +728,11 @@ TclpObjLink(pathPtr, toPtr)
     Tcl_Obj *pathPtr;
     Tcl_Obj *toPtr;
 {
+    extern Tcl_Filesystem nativeFilesystem;
+
     if (toPtr != NULL) {
 	CONST char *src = Tcl_FSGetNativePath(pathPtr);
-	CONST char *target Tcl_FSGetNativePath(toPtr);
+	CONST char *target = Tcl_FSGetNativePath(toPtr);
 	
 	if (src == NULL || target == NULL) {
 	    return NULL;
-- 
cgit v0.12