Sentinel file to indicate cache entry complete.

1 files changed, 6 insertions, 2 deletions

diff --git a/lib/LXRng/Web.pm b/lib/LXRng/Web.pm
index 126bf9b..78380c8 100644
--- a/lib/LXRng/Web.pm
+++ b/lib/LXRng/Web.pm
@@ -91,7 +91,7 @@ sub print_markedup_file {
 	$cfile = $context->config->{'cache'}.'/'.$shaid
 	    if exists $context->config->{'cache'};
 
-	if ($cfile and -d $cfile) {
+	if ($cfile and -e "$cfile/.complete") {
 	    print("<pre id=\"file_contents\">");
 	    while (-r "$cfile/$line") {
 		print("<div class=\"".($focus ? "done" : "pending").
@@ -160,7 +160,11 @@ sub print_markedup_file {
 		}
 	    }
 	    print("</div></pre>\n");
-	    close($cache) if $cache;
+	    if ($cache) {
+		close($cache);
+		open($cache, '>', "$cfile/.complete");
+		close($cache);
+	    }
 	}
 	return $shaid;
     }