Made prune paths relative

This commit is contained in:
hjp 2006-11-28 16:00:58 +00:00
parent 9e4d6c250f
commit 07d7027bf0
1 changed files with 6 additions and 4 deletions

View File

@ -35,11 +35,13 @@ sub new {
# * Other system dependent parameters, e.g., whether to use ACLs # * Other system dependent parameters, e.g., whether to use ACLs
# #
# For now we just hardcode the stuff: # For now we just hardcode the stuff:
$self->{prune} = { $self->{prune} = {
'/proc' => 1, # directories to prune. These are relative
'/sys' => 1, # paths which may not be ideal.
'/nfs' => 1, './proc' => 1,
'/tmp/hyre_be_dragones' => 1, './sys' => 1,
'./nfs' => 1,
}; };
$self->{charset} = 'utf-8'; $self->{charset} = 'utf-8';
$self->{fh_out} = exists($opt->{fh_out}) ? $opt->{fh_out} : \*STDOUT; $self->{fh_out} = exists($opt->{fh_out}) ? $opt->{fh_out} : \*STDOUT;