# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1110591385 0
# Node ID f5607c3ce8fd313eed37c3bbb6af121ff0a181ea
# Parent  76fcfe4d97def0f3d96f3c3130d0cac4cc18823b
(Fmake_symbolic_link): Fix last change.

diff -r 76fcfe4d97de -r f5607c3ce8fd src/fileio.c
--- a/src/fileio.c	Fri Mar 11 23:51:27 2005 +0000
+++ b/src/fileio.c	Sat Mar 12 01:36:25 2005 +0000
@@ -1,6 +1,6 @@
 /* File IO for GNU Emacs.
    Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, 1996, 1997, 1998,
-     1999, 2000, 2001, 2003, 2004  Free Software Foundation, Inc.
+     1999, 2000, 2001, 2003, 2004, 2005  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -2851,7 +2851,7 @@
     filename = Fexpand_file_name (filename, Qnil);
 
   if (!NILP (Ffile_directory_p (linkname)))
-    linkname = Fexpand_file_name (Ffile_name_nondirectory (file), linkname);
+    linkname = Fexpand_file_name (Ffile_name_nondirectory (filename), linkname);
   else
     linkname = Fexpand_file_name (linkname, Qnil);