Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
bugzilla
Project
Project
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Registry
Registry
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Ivan Ivlev
bugzilla
Commits
8e1441fe
Commit
8e1441fe
authored
May 09, 2002
by
gerv%gerv.net
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Bug 143040 - Tidy up remove parameters message in checksetup.pl. Patch by gerv; r=justdave, ddk.
parent
74bcd6f1
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
12 additions
and
16 deletions
+12
-16
checksetup.pl
checksetup.pl
+11
-6
defparams.pl
defparams.pl
+1
-10
No files found.
checksetup.pl
View file @
8e1441fe
...
...
@@ -903,22 +903,27 @@ if (-e "data/params") {
require
"data/params"
;
require
"defparams.pl"
;
use
vars
@::param_list
;
my
@oldparams
;
open
(
PARAMFILE
,
">>old-params.txt"
)
||
die
"$0: Can't open old-params.txt for writing: $!\n"
;
foreach
my
$item
(
keys
%::
param
)
{
if
(
!
grep
(
$_
eq
$item
,
@::param_list
)
&&
$item
ne
"version"
)
{
print
"The $item parameter is no longer used in Bugzilla,
so it has been removed from your parameters file and
written to old-params.txt.\n"
;
print
PARAMFILE
"\n\n$item:\n"
;
print
PARAMFILE
$::param
{
$item
};
push
(
@oldparams
,
$item
);
print
PARAMFILE
"\n\n$item:\n$::param{$item}\n"
;
delete
$::param
{
$item
};
}
}
if
(
@oldparams
)
{
print
"The following parameters are no longer used in Bugzilla, "
.
"and so have been\nremoved from your parameters file and "
.
"appended to old-params.txt:\n"
;
print
join
(
", "
,
@oldparams
)
.
"\n\n"
;
}
close
PARAMFILE
;
WriteParams
();
}
...
...
defparams.pl
View file @
8e1441fe
...
...
@@ -54,16 +54,7 @@ sub WriteParams {
}
}
}
# If Bugzilla has been upgraded since the last time parameters were edited,
# and some parameters have been removed in the new version of Bugzilla,
# remove them from the parameters file.
foreach
my
$item
(
keys
%::
param
)
{
if
(
!
grep
(
$_
eq
$item
,
@::param_list
)
&&
$item
ne
"version"
)
{
print
"The <em>$item</em> parameter is no longer used in Bugzilla
and has been removed from your parameters file.<br>"
;
delete
$::param
{
$item
};
}
}
my
$tmpname
=
"data/params.$$"
;
open
(
FID
,
">$tmpname"
)
||
die
"Can't create $tmpname"
;
my
$v
=
$::param
{
'version'
};
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment