summaryrefslogtreecommitdiff
path: root/lib/perl5db.t
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2006-11-14 23:24:45 +0000
committerDave Mitchell <davem@fdisolutions.com>2006-11-14 23:24:45 +0000
commit3e5e55bd9605a684d64a1a191319fa2d90836414 (patch)
tree0c61419949689fd67d70dc6ab010c6cad77bf089 /lib/perl5db.t
parent635f2c9e92f8c492655e9f22e378ee92d3368ced (diff)
downloadperl-3e5e55bd9605a684d64a1a191319fa2d90836414.tar.gz
debugger test could hang if run with umask 0002
p4raw-id: //depot/perl@29275
Diffstat (limited to 'lib/perl5db.t')
-rw-r--r--lib/perl5db.t3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/perl5db.t b/lib/perl5db.t
index 8735e87a44..5323f79c7b 100644
--- a/lib/perl5db.t
+++ b/lib/perl5db.t
@@ -22,6 +22,9 @@ sub rc {
open RC, ">", ".perldb" or die $!;
print RC @_;
close(RC);
+ # overly permissive perms gives "Must not source insecure rcfile"
+ # and hangs at the DB(1> prompt
+ chmod 0644, ".perldb";
}
rc(