| line |
true |
false |
branch |
|
73
|
0 |
0 |
unless (defined $self->Directory) |
|
77
|
0 |
0 |
unless (-d $self->Directory) |
|
82
|
0 |
0 |
if (not -w $self->Directory) |
|
98
|
0 |
0 |
if (not defined $content) { } |
|
102
|
0 |
0 |
unless open C, ">$tempfile" |
|
103
|
0 |
0 |
unless print C $content |
|
104
|
0 |
0 |
unless close C |
|
105
|
0 |
0 |
if (@oldstat) |
|
115
|
0 |
0 |
unless rename $tempfile, $file |
|
129
|
0 |
0 |
unless open C, $file |
|
157
|
0 |
0 |
if (eval 'require File::Copy; 1') { } |
|
160
|
0 |
0 |
unless File::Copy::copy($from_filename, $to_filename) |
|
179
|
0 |
0 |
unless (UNIVERSAL::isa($obj, 'WE::Obj')) |
|
182
|
0 |
0 |
unless $obj |
|
204
|
0 |
0 |
exists $WE::DB::Content::mime_types{$mimetype} ? : |
|
205
|
0 |
0 |
unless (defined $ext) |
|
207
|
0 |
0 |
if (eval 'require MIME::Types; 1') |
|
209
|
0 |
0 |
if @ext |
|
212
|
0 |
0 |
unless (defined $ext) |
|
213
|
0 |
0 |
if $WE::DB::Content::VERBOSE |
|
238
|
0 |
0 |
unless defined $self->Directory or not -d $self->Directory |
|
241
|
0 |
0 |
if $f =~ /^\.\.?$/ |
|
242
|
0 |
0 |
unless unlink $self->Directory . '/' . $f |
|
278
|
0 |
0 |
defined $args{-'scope'} ? : |
|
281
|
0 |
0 |
unless ($obj) |
|
285
|
0 |
0 |
unless ($args{-'regexp'}) |
|
288
|
0 |
0 |
unless ($args{-'casesensitive'}) |
|
308
|
0 |
0 |
if ($obj->is_folder) { } |
|
|
0 |
0 |
elsif ($obj->is_doc) { } |
|
314
|
0 |
0 |
if grep {$_ =~ /$term/s;} $self->get_content($obj->Id) |