diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-21 20:50:21 +0100 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2008-02-21 20:50:21 +0100 |
| commit | 1fab35fc569cb895c6b78980b4383ff7f5cb0db5 (patch) | |
| tree | c4177a7635763cd4648a47762b5454e4196d0133 /lib | |
| parent | 76324108d049c8f6e2edde5ab4bd69f428e15c57 (diff) | |
| parent | e448ddd25bfd02007f22afc779ff4a4da332b7bd (diff) | |
Merge branch 'master' of /home/argggh/git/lxrng/
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/LXRng/Web.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lib/LXRng/Web.pm b/lib/LXRng/Web.pm index 52988ba..36e6f55 100644 --- a/lib/LXRng/Web.pm +++ b/lib/LXRng/Web.pm @@ -119,8 +119,10 @@ sub print_markedup_file { } else { my $cache; - mkpath($cfile, 0, 0777); - open($cache, '>', "$cfile/0") if $cfile; + if ($cfile) { + mkpath($cfile, 0, 0777); + open($cache, '>', "$cfile/0"); + } my $handle = $node->handle(); LXRng::Lang->init($context); my $lang = LXRng::Lang->new($node); |