Update of /cvsroot/sandweb/sandweb/bin
In directory usw-pr-cvs1:/tmp/cvs-serv383
Modified Files:
sandweb.cgi
Log Message:
bugfix - $location was not being passed when the file was opened,
and there was no / between $username and $file ( there is not supposed
to be a space between $username and $location, this is probably some
kind of weird typo situation ).
Anyway. fixed, tested.
Index: sandweb.cgi
===================================================================
RCS file: /cvsroot/sandweb/sandweb/bin/sandweb.cgi,v
retrieving revision 1.91
retrieving revision 1.92
diff -U2 -r1.91 -r1.92
--- sandweb.cgi 2001/12/07 00:18:19 1.91
+++ sandweb.cgi 2001/12/16 08:30:47 1.92
@@ -430,5 +430,5 @@
my $filename = $file->get_filename();
- open ( FILE, "> $users_dir/$username$filename" );
+ open ( FILE, "> $users_dir/$username$location/$filename" );
print FILE "$data";
close FILE;
|