1 files changed, 75 insertions, 75 deletions
diff --git a/sp/src/devtools/bin/copyshaderincfiles.pl b/sp/src/devtools/bin/copyshaderincfiles.pl
index 21702d8f..c3419e62 100644
--- a/sp/src/devtools/bin/copyshaderincfiles.pl
+++ b/sp/src/devtools/bin/copyshaderincfiles.pl
@@ -1,75 +1,75 @@
-BEGIN {use File::Basename; push @INC, dirname($0); }
-require "valve_perl_helpers.pl";
-use Cwd;
-use String::CRC32;
-
-my $txtfilename = shift;
-my $arg = shift;
-
-my $is360 = 0;
-my $platformextension = "";
-if( $arg =~ m/-x360/i )
-{
-	$is360 = 1;
-	$platformextension = ".360";
-}
-
-open TXTFILE, "<$txtfilename";
-
-my $src;
-my $dst;
-while( $src = <TXTFILE> )
-{
-	# get rid of comments
-	$src =~ s,//.*,,g;
-
-	# skip blank lines
-	if( $src =~ m/^\s*$/ )
-	{
-		next;
-	}
-
-	# Get rid of newlines.
-	$src =~ s/\n//g;
-	
-	# Save off the shader source filename.
-	my $dst = $src;
-	
-	$dst =~ s/_tmp//gi;
-
-	# Does the dst exist?
-	my $dstexists = -e $dst;
-	my $srcexists = -e $src;
-	# What are the time stamps for the src and dst?
-	my $srcmodtime = ( stat $src )[9];
-	my $dstmodtime = ( stat $dst )[9];
-
-	# Open for edit or add if different than what is in perforce already.
-	if( !$dstexists || ( $srcmodtime != $dstmodtime ) )
-	{
-		# Make the target writable if it exists
-		if( $dstexists )
-		{
-			MakeFileWritable( $dst );
-		}
-
-		my $dir = $dst;
-		$dir =~ s,([^/\\]*$),,;  # rip the filename off the end
-		my $filename = $1;
-
-		# create the target directory if it doesn't exist
-		if( !$dstexists )
-		{
-			&MakeDirHier( $dir, 0777 );
-		}
-
-		# copy the file to its targets. . . we want to see STDERR here if there is an error.
-		my $cmd = "copy $src $dst > nul";
-#		print STDERR "$cmd\n";
-		system $cmd;
-		
-		MakeFileReadOnly( $dst );
-	}
-}
-
-close TXTFILE;
+BEGIN {use File::Basename; push @INC, dirname($0); }
+require "valve_perl_helpers.pl";
+use Cwd;
+use String::CRC32;
+
+my $txtfilename = shift;
+my $arg = shift;
+
+my $is360 = 0;
+my $platformextension = "";
+if( $arg =~ m/-x360/i )
+{
+	$is360 = 1;
+	$platformextension = ".360";
+}
+
+open TXTFILE, "<$txtfilename";
+
+my $src;
+my $dst;
+while( $src = <TXTFILE> )
+{
+	# get rid of comments
+	$src =~ s,//.*,,g;
+
+	# skip blank lines
+	if( $src =~ m/^\s*$/ )
+	{
+		next;
+	}
+
+	# Get rid of newlines.
+	$src =~ s/\n//g;
+	
+	# Save off the shader source filename.
+	my $dst = $src;
+	
+	$dst =~ s/_tmp//gi;
+
+	# Does the dst exist?
+	my $dstexists = -e $dst;
+	my $srcexists = -e $src;
+	# What are the time stamps for the src and dst?
+	my $srcmodtime = ( stat $src )[9];
+	my $dstmodtime = ( stat $dst )[9];
+
+	# Open for edit or add if different than what is in perforce already.
+	if( !$dstexists || ( $srcmodtime != $dstmodtime ) )
+	{
+		# Make the target writable if it exists
+		if( $dstexists )
+		{
+			MakeFileWritable( $dst );
+		}
+
+		my $dir = $dst;
+		$dir =~ s,([^/\\]*$),,;  # rip the filename off the end
+		my $filename = $1;
+
+		# create the target directory if it doesn't exist
+		if( !$dstexists )
+		{
+			&MakeDirHier( $dir, 0777 );
+		}
+
+		# copy the file to its targets. . . we want to see STDERR here if there is an error.
+		my $cmd = "copy $src $dst > nul";
+#		print STDERR "$cmd\n";
+		system $cmd;
+		
+		MakeFileReadOnly( $dst );
+	}
+}
+
+close TXTFILE;