diff --git a/analyze b/analyze index e4d1f28..20a9bbb 100755 --- a/analyze +++ b/analyze @@ -751,20 +751,27 @@ sub summarize_results_html_plot { } .source { - margin-top: 1em; font-size: smaller; - position: relative; + text-align: right; + position: absolute; + top: 0.25em; + right: 0; + cursor: pointer; + z-index: 100; + color: #3F3F3F; } -.source div { - float: left; - border: 1px - solid - #DFDFDF; - color: #3F3F3F; - margin: 0.25em; +.sources { + display: none; + text-align: left; + background: rgba(255,255,255,0.9); + border: 1px solid #DFDFDF; padding: 0.25em; } + +.sources div { + margin: 0.25em; +} @@ -811,9 +818,9 @@ PLOT_HEADER for (qw(perl6 nqp perl5)) { next unless my $code = $test->{conf}{my $name = $_}; next if ref $code; - $code =~ s/&/&/g; - $code =~ s/</g; - $code =~ s/>/>/g; + $code =~ s/&/&/g; + $code =~ s/</g; + $code =~ s/>/>/g; if ($name =~ s/(\d)$/ $1/) { $name = ucfirst $name; } else { @@ -822,12 +829,12 @@ PLOT_HEADER $source .= qq^
$code