Fix mtime substitution

diff --git a/zk b/zk
index 4420ba97aad2ca7218408681e5e121c2bfabb685..20a1fb3cbe25c3e58de431e692e4ab0aa5feb335 100755 (executable)
--- a/zk
+++ b/zk
@@ -262,7 +262,7 @@ sub genHTML {
         print $out "<table border=1><caption>Links</caption>\n";
         my $mtime;
         while (my ($i, $l) = each @lnks) {
-            $mtime = (defined $mtimes{$l}) ? defined $mtimes{$l} : "";
+            $mtime = (defined $mtimes{$l}) ? $mtimes{$l} : "";
             print $out "<tr><td><a href=\"$rels[$i].html\">$l</a></td>
     <td><tt>$mtime</tt></td></tr>\n";
         }