version 1.435, 2010/01/02 23:56:06
|
version 1.435.2.1, 2010/01/06 04:19:08
|
Line 2091 sub update_resource_handler {
|
Line 2091 sub update_resource_handler {
|
if (-e $fname) { |
if (-e $fname) { |
# Delete preview file, if exists |
# Delete preview file, if exists |
unlink("$fname.tmp"); |
unlink("$fname.tmp"); |
|
# Delete GCI Test Assembly preview file, if exists |
|
unlink("$fname.tn"); |
# Get usage stats |
# Get usage stats |
my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, |
my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, |
$atime,$mtime,$ctime,$blksize,$blocks)=stat($fname); |
$atime,$mtime,$ctime,$blksize,$blocks)=stat($fname); |