… | |
… | |
4 | # the accompanying file COPYING.Affero for details. |
4 | # the accompanying file COPYING.Affero for details. |
5 | # |
5 | # |
6 | # This file is free software: you can redistribute it and/or modify |
6 | # This file is free software: you can redistribute it and/or modify |
7 | # it under the terms of the GNU Affero General Public License as published by |
7 | # it under the terms of the GNU Affero General Public License as published by |
8 | # the Free Software Foundation, version 3 of the License only. |
8 | # the Free Software Foundation, version 3 of the License only. |
9 | # |
9 | # |
10 | # This program is distributed in the hope that it will be useful, |
10 | # This program is distributed in the hope that it will be useful, |
11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | # but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
12 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
13 | # GNU General Public License for more details. |
13 | # GNU General Public License for more details. |
14 | # |
14 | # |
15 | # The authors can be reached via e-mail to <support@deliantra.com> |
15 | # The authors can be reached via e-mail to <support@deliantra.com> |
16 | |
16 | |
17 | # The intent of this file is to provide the user of the server with |
17 | # The intent of this file is to provide the user of the server with |
18 | # a URL where he/she can download the source code of this program |
18 | # a URL where he/she can download the source code of this program |
19 | # together with any maps and archetype data used to run the server. |
19 | # together with any maps and archetype data used to run the server. |
20 | |
20 | |
21 | # The default uses the location of the pristine release and works |
21 | # The default uses the location of the pristine release and works |
22 | # unless you modify the server, in which case you are required to |
22 | # unless you modify the server, in which case you are required to |
23 | # either update the URL here or, preferably, change the source_url_tar |
23 | # either update the URL here or, preferably, change the source_url_tar |
24 | # and source_url_cvs settings in $CONFDIR/config. |
24 | # and source_url_cvs settings in $CONFDIR/config. |
|
|
25 | CONF URL_CVS : source_url_cvs = "http://software.schmorp.de/pkg/cf.schmorp.de.html"; |
25 | our $URL_TAR = $cf::CFG{source_url_tar} || "http://dist.schmorp.de/deliantra/"; |
26 | CONF URL_TAR : source_url_tar = "http://dist.schmorp.de/deliantra/"; |
|
|
27 | |
26 | our $URL_TAR_SERVER = "$URL_TAR/cfserver-" . cf::VERSION . ".tar.bz2"; |
28 | our $URL_TAR_SERVER = "$URL_TAR/cfserver-" . cf::VERSION . ".tar.bz2"; |
27 | our $URL_TAR_ARCH = "$URL_TAR/cfarch-" . cf::VERSION . ".tar.bz2"; |
29 | our $URL_TAR_ARCH = "$URL_TAR/cfarch-" . cf::VERSION . ".tar.bz2"; |
28 | our $URL_TAR_MAPS = "$URL_TAR/cfmaps-" . cf::VERSION . ".tar.bz2"; |
30 | our $URL_TAR_MAPS = "$URL_TAR/cfmaps-" . cf::VERSION . ".tar.bz2"; |
29 | our $URL_CVS = $cf::CFG{source_url_cvs} || "http://software.schmorp.de/pkg/cf.schmorp.de.html"; |
|
|
30 | |
31 | |
31 | cf::register_command sourcecode => sub { |
32 | cf::register_command sourcecode => sub { |
32 | my ($ob, $arg) = @_; |
33 | my ($ob, $arg) = @_; |
33 | |
34 | |
34 | $ob->reply (undef, <<EOF, cf::NDI_UNIQUE | cf::NDI_DK_ORANGE); |
35 | $ob->reply (undef, <<EOF, cf::NDI_UNIQUE | cf::NDI_DK_ORANGE); |