projects
/
irspy-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Support for implementation names.
[irspy-moved-to-github.git]
/
web
/
htdocs
/
details
/
stats.mc
diff --git
a/web/htdocs/details/stats.mc
b/web/htdocs/details/stats.mc
index
a1871cf
..
e5db7eb
100644
(file)
--- a/
web/htdocs/details/stats.mc
+++ b/
web/htdocs/details/stats.mc
@@
-1,4
+1,4
@@
-%# $Id: stats.mc,v 1.5 2006-12-18 15:38:09 mike Exp $
+%# $Id: stats.mc,v 1.7 2007-10-31 16:42:26 mike Exp $
<%doc>
Here are the headings in the Z-Spy version:
The ten most commonly supported Bib-1 Use attributes
<%doc>
Here are the headings in the Z-Spy version:
The ten most commonly supported Bib-1 Use attributes
@@
-27,7
+27,7
@@
my $from_cache = 1;
my $stats = $m->cache->get($key);
if (!defined $stats || $reload) {
$from_cache = 0;
my $stats = $m->cache->get($key);
if (!defined $stats || $reload) {
$from_cache = 0;
- $stats = new ZOOM::IRSpy::Stats("localhost:3313/IR-Explain---1", $query);
+ $stats = new ZOOM::IRSpy::Stats("localhost:8018/IR-Explain---1", $query);
$m->cache->set($key, $stats, "10 minutes");
}
</%perl>
$m->cache->set($key, $stats, "10 minutes");
}
</%perl>
@@
-55,6
+55,9
@@
if (!defined $stats || $reload) {
<& table, stats => $stats, data => "domains",
title => "Top Domains",
headings => [ "Top Domain"] &>
<& table, stats => $stats, data => "domains",
title => "Top Domains",
headings => [ "Top Domain"] &>
+<& table, stats => $stats, data => "implementation",
+ title => "Implementation",
+ headings => [ "Name" ] &>
%#
%#
<%def table>
%#
%#
<%def table>