summaryrefslogtreecommitdiffstats
path: root/Bugzilla/Install/Util.pm
diff options
context:
space:
mode:
authormkanat%bugzilla.org <>2007-08-08 02:12:55 +0200
committermkanat%bugzilla.org <>2007-08-08 02:12:55 +0200
commita54149e000548823cfc5821957bc7e5c13def944 (patch)
treee519e64ab0660cd2a55fd90e4d3a6b6bc4cdde46 /Bugzilla/Install/Util.pm
parent3ee9b0a296890ace3e960b6f6ae463a0f45da980 (diff)
downloadbugzilla-a54149e000548823cfc5821957bc7e5c13def944.tar.gz
bugzilla-a54149e000548823cfc5821957bc7e5c13def944.tar.xz
Bug 389845: Remove setup.cgi from Bugzilla (no web-based installation)
Patch By Max Kanat-Alexander <mkanat@bugzilla.org> r=LpSolit, a=mkanat
Diffstat (limited to 'Bugzilla/Install/Util.pm')
-rw-r--r--Bugzilla/Install/Util.pm26
1 files changed, 0 insertions, 26 deletions
diff --git a/Bugzilla/Install/Util.pm b/Bugzilla/Install/Util.pm
index a590238e4..931d9f1b5 100644
--- a/Bugzilla/Install/Util.pm
+++ b/Bugzilla/Install/Util.pm
@@ -37,7 +37,6 @@ our @EXPORT_OK = qw(
get_version_and_os
indicate_progress
install_string
- is_web
template_include_path
vers_cmp
);
@@ -79,8 +78,6 @@ sub install_string {
# Find the first template that defines this string.
foreach my $dir (@$path) {
my $base = "$dir/setup/strings";
- $string_template = _get_string_from_file($string_id, "$base.html.pl")
- if is_web();
$string_template = _get_string_from_file($string_id, "$base.txt.pl")
if !defined $string_template;
last if defined $string_template;
@@ -237,23 +234,6 @@ sub vers_cmp {
# Helper Subroutines #
######################
-# Tells us if we're running in a web interface (Usually, this means
-# we're running in setup.cgi as opposed to checksetup.pl, but sometimes
-# this function *might* get called from within normal Bugzilla code.)
-sub is_web {
- # When this is called, we may or may not have all of our required
- # perl modules installed.
- #
- # The way this is written works for all of these circumstances:
- # * We're in checksetup.pl, before and after requirements-checking
- # * We're in setup.cgi, before and after requirements-checking
- # * We're in email_in.pl, the WebService interface, or something else
- # (That's primarily what the "return 0" check below is for.)
- my $usage_mode = eval { Bugzilla->usage_mode };
- return 0 if (defined $usage_mode && $usage_mode != USAGE_MODE_BROWSER);
- return i_am_cgi();
-}
-
# Used by install_string
sub _get_string_from_file {
my ($string_id, $file) = @_;
@@ -336,12 +316,6 @@ sub is_tainted {
return not eval { my $foo = join('',@_), kill 0; 1; };
}
-sub i_am_cgi {
- # I use SERVER_SOFTWARE because it's required to be
- # defined for all requests in the CGI spec.
- return exists $ENV{'SERVER_SOFTWARE'} ? 1 : 0;
-}
-
__END__
=head1 NAME