[Sandweb-commit] CVS: sandweb/lib/SandWeb File.pm,1.42,1.43

[Rob H. <for...@us...>]

Update of /cvsroot/sandweb/sandweb/lib/SandWeb
In directory usw-pr-cvs1:/tmp/cvs-serv14320/lib/SandWeb

Modified Files:
	File.pm 
Log Message:
better regexp loop for IE file upload workaround


Index: File.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/File.pm,v
retrieving revision 1.42
retrieving revision 1.43
diff -U2 -r1.42 -r1.43
--- File.pm	10 Feb 2002 21:12:53 -0000	1.42
+++ File.pm	10 Feb 2002 21:23:52 -0000	1.43
@@ -130,12 +130,6 @@
 
 # begin workaround for IE/Windows upload behaviour
-	$filename =~ /\\/;
-
-	while ( $' =~ /\\/ ) {
-        	$' =~ /\\/;
-	}
-
-	if ( $filename =~ /\\/ ) {
-		$filename = $';
+	while ( $filename =~ /\\/ ) {
+        	$filename = $';
 	}
 # end workaround for IE/Windows upload behaviour