Mailing List Archive

r3773 - branches/maint_0.1x/t
Author: creamyg
Date: 2008-08-27 13:26:12 -0700 (Wed, 27 Aug 2008)
New Revision: 3773

Modified:
branches/maint_0.1x/t/KinoSearchTestInvIndex.pm
Log:
Ignore directory permissions, just zap.

Modified: branches/maint_0.1x/t/KinoSearchTestInvIndex.pm
===================================================================
--- branches/maint_0.1x/t/KinoSearchTestInvIndex.pm 2008-08-27 20:24:45 UTC (rev 3772)
+++ branches/maint_0.1x/t/KinoSearchTestInvIndex.pm 2008-08-27 20:26:12 UTC (rev 3773)
@@ -37,10 +37,7 @@
# Verify that this user owns the working dir, then zap it. Returns true upon
# success.
sub remove_working_dir {
- my $mode = (stat $working_dir)[2];
return unless -d $working_dir;
- $mode &= 07777;
- return unless $mode == 0700;
rmtree $working_dir;
return 1;
}


_______________________________________________
kinosearch-commits mailing list
kinosearch-commits@rectangular.com
http://www.rectangular.com/mailman/listinfo/kinosearch-commits