Mailing List Archive

Author: creamyg
Date: 2008-08-27 09:33:59 -0700 (Wed, 27 Aug 2008)
New Revision: 3769

Modified:
branches/maint_0.1x/t/001-build_invindexes.t
Log:
Don't check permissions on directory (not portable), just test to see if it
exists. [maint]


Modified: branches/maint_0.1x/t/001-build_invindexes.t
===================================================================
--- branches/maint_0.1x/t/001-build_invindexes.t 2008-08-27 16:23:50 UTC (rev 3768)
+++ branches/maint_0.1x/t/001-build_invindexes.t 2008-08-27 16:33:59 UTC (rev 3769)
@@ -15,16 +15,8 @@

remove_working_dir();
ok( !-e working_dir(), "Working dir doesn't exist" );
-
create_working_dir();
-my $mode = ( stat( working_dir() ) )[2] & 07777;
-if ( $mode == 0700 ) {
- pass("Working dir successfully created with correct permissions");
-}
-else {
- BAIL_OUT( "Unsafe to continue: working dir '" . working_dir()
- . "' not owned exclusively by this user" );
-}
+ok( -e working_dir(), "Working dir successfully created" );

create_persistent_test_invindex();



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