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; if ($name =~ s/(\d)$/ $1/) { $name = ucfirst $name; } else { @@ -822,12 +829,12 @@ PLOT_HEADER $source .= qq^
$name: $code
^; } if ($source) { - $source = qq^
$source
^; + $source = qq^
[ Code ]
$source
^; } $html .= <<"CHART_TOP";
-
$source +