1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
|
--- cvsweb.cgi Sun Nov 26 02:51:04 2000
+++ cvsweb_graph.cgi Fri Mar 23 00:03:19 2001
@@ -331,8 +331,9 @@
#
# See if the module is in our forbidden list.
#
-$where =~ m:([^/]*):;
+$where =~ m:([^/]*)/(.*):;
$module = $1;
+my $pathinrepository = $2;
if ($module && &forbidden_module($module)) {
&fatal("403 Forbidden", "Access to $where forbidden.");
}
@@ -499,7 +500,7 @@
next if ($input{'hidenonreadable'} && !(-r "$fullname/$_"));
if (s|^Attic/||) {
- $attic = " (in the Attic) " . $hideAtticToggleLink;
+ $attic = " (in the Attic) " . $hideAtticToggleLink;
}
else {
$attic = "";
@@ -530,7 +531,7 @@
else {
print &link($diricon,$url);
}
- print " ", &link($_ . "/", $url), $attic;
+ print " ", &link($_ . "/", $url), $attic;
if ($_ eq "Attic") {
print " <a href=\"./" .
&toggleQuery ("hideattic") .
@@ -603,6 +604,14 @@
print &link($fileicon,$url);
}
print " ", &link($_, $url), $attic;
+#*** BS Entered graphing option
+ print "<a href=\"/~bertho/cvsgraph/cvsgraphwrapper.php3" .
+ (length($query) != 0 ? "$query\&" : "?") .
+ "r=" . urlencode($cvsroot) .
+ "\&m=" . urlencode($module) .
+ "\&f=" . urlencode($pathinrepository . ($attic ? "Attic/" : "") . $_) .
+ "\">Graph</a>";
+#***
print "</td><td> " if ($dirtable);
download_link($fileurl,
$rev, $rev,
@@ -2349,7 +2358,7 @@
$text = $text . "s";
}
if ($num > 0) {
- return $num . " " . $text;
+ return $num . " " . $text;
}
else {
return "";
@@ -2368,7 +2377,7 @@
# this function works correct for time >= 2 seconds
if ($secs < 2) {
- return "very little time";
+ return "very little time";
}
my %desc = (1 , 'second',
@@ -2394,7 +2403,7 @@
my $resttime = plural_write(int ($rest / $break),
$desc{"$break"});
if ($resttime) {
- $retval = $retval . ", " . $resttime;
+ $retval = $retval . ", " . $resttime;
}
}
|
