* cvsweb: Delete the pointless support for %MIRRORS.
@ 2019-11-26 12:09 schwarze
0 siblings, 0 replies; only message in thread
From: schwarze @ 2019-11-26 12:09 UTC (permalink / raw)
To: source
Log Message:
-----------
Delete the pointless support for %MIRRORS.
CVSweb traffic will never be demanding, and in this day and age,
web servers are powerful enough.
Modified Files:
--------------
cvsweb:
cvsweb.cgi
cvsweb.conf
Revision Data
-------------
Index: cvsweb.cgi
===================================================================
RCS file: /home/cvs/mandoc/cvsweb/cvsweb.cgi,v
retrieving revision 4.26
retrieving revision 4.27
diff -Lcvsweb.cgi -Lcvsweb.cgi -u -p -r4.26 -r4.27
--- cvsweb.cgi
+++ cvsweb.cgi
@@ -57,7 +57,7 @@ use vars qw (
$VERSION $CheckoutMagic $MimeTypes $DEBUG
$config $allow_version_select
@CVSrepositories @CVSROOT %CVSROOT %CVSROOTdescr
- %MIRRORS %DEFAULTVALUE %ICONS %MTYPES
+ %DEFAULTVALUE %ICONS %MTYPES
%DIFF_COMMANDS @DIFFTYPES %DIFFTYPES @LOGSORTKEYS %LOGSORTKEYS
%alltags %fileinfo %tags @branchnames %nameprinted
%symrev %revsym @allrevisions %date %author @revdisplayorder
@@ -167,7 +167,6 @@ sub plural_write($$);
sub readableTime($$);
sub clickablePath($$);
sub chooseCVSRoot();
-sub chooseMirror();
sub fileSortCmp();
sub download_url($$;$);
sub download_link($$$;$);
@@ -195,7 +194,7 @@ $config = '/conf/cvsweb/cvsweb.conf';
######## Configuration parameters #########
-@CVSrepositories = @CVSROOT = %CVSROOT = %MIRRORS = %DEFAULTVALUE = %ICONS =
+@CVSrepositories = @CVSROOT = %CVSROOT = %DEFAULTVALUE = %ICONS =
%MTYPES = %tags = %alltags = %fileinfo = %DIFF_COMMANDS = ();
$logo = $defaulttitle =
@@ -788,9 +787,7 @@ if (-d $fullname) {
# give direct access to dirs
if ($where eq '/') {
- chooseMirror();
chooseCVSRoot();
-
} else {
print '<p>Current directory: <b>', clickablePath($where, 0), '</b>';
print "</p>\n";
@@ -3479,27 +3476,6 @@ Module path or alias:
</p>
</form>
EOF
-}
-
-
-sub chooseMirror()
-{
- # This code comes from the original BSD-cvsweb
- # and may not be useful for your site; If you don't
- # set %MIRRORS this won't show up, anyway.
- scalar(%MIRRORS) or return;
-
- # Should perhaps exclude the current site somehow...
- print "\n<p>\nThis CVSweb is mirrored in\n";
-
- my @tmp = map(&link(htmlquote($_), $MIRRORS{$_}), sort keys %MIRRORS);
- my $tmp = pop (@tmp);
-
- if (scalar(@tmp)) {
- print join (', ', @tmp), ' and ';
- }
-
- print "$tmp.\n</p>\n";
}
Index: cvsweb.conf
===================================================================
RCS file: /home/cvs/mandoc/cvsweb/cvsweb.conf,v
retrieving revision 4.14
retrieving revision 4.15
diff -Lcvsweb.conf -Lcvsweb.conf -u -p -r4.14 -r4.15
--- cvsweb.conf
+++ cvsweb.conf
@@ -57,14 +57,6 @@ $CMD{tar} ||= search_path('tar');
'local' => ['Local Repository', '/cvs'],
);
-# Mirror sites. The keys will be used as link texts, and the values are
-# URLs pointing to the corresponding mirrors.
-#
-#%MIRRORS = (
-# 'Other location' => 'http://192.168.0.1/cgi-bin/cvsweb.cgi/',
-# 'Yet another one' => 'http://192.168.0.2/cgi-bin/cvsweb.cgi/',
-#);
-
# Manual gateway linking. This will be done only for views for which
# $allow_*_extra below is true.
#
--
To unsubscribe send an email to source+unsubscribe@mandoc.bsd.lv
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2019-11-26 12:09 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2019-11-26 12:09 cvsweb: Delete the pointless support for %MIRRORS schwarze
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).