| |
| +- exec
| |
+ | +- layer
+ | |
| +- newline
| |
| +- pipe
sub open {
my $path = shift ;
- if (warnings::enabled() && $path !~ m#^/#) {
- warnings::warn("changing relative path to /tmp/");
+ if ($path !~ m#^/#) {
+ warnings::warn("changing relative path to /tmp/")
+ if warnings::enabled();
$path = "/tmp/$path" ;
}
}