Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Open sidebar
ensembl-gh-mirror
ensembl
Commits
070a3f46
Commit
070a3f46
authored
Jan 24, 2008
by
Andreas Kusalananda Kähäri
Browse files
In check_consistency(), if finding any inconsistencies, display what
they are.
parent
b42e9c30
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
3 deletions
+8
-3
misc-scripts/attribute_types/upload_attributes.pl
misc-scripts/attribute_types/upload_attributes.pl
+8
-3
No files found.
misc-scripts/attribute_types/upload_attributes.pl
View file @
070a3f46
...
...
@@ -201,9 +201,14 @@ sub check_consistency {
# check if any ids in the database collide with the file
my
$consistent
=
1
;
for
my
$dbid
(
keys
%db_codes
)
{
if
(
!
exists
$file_codes
{
$dbid
}
||
$file_codes
{
$dbid
}
ne
$db_codes
{
$dbid
}
)
{
if
(
!
exists
$file_codes
{
$dbid
}
)
{
printf
(
"
Not consistent: code '%d' ('%s') not in file.
\n
",
$dbid
,
$db_codes
{
$dbid
}
);
$consistent
=
0
;
}
elsif
(
$file_codes
{
$dbid
}
ne
$db_codes
{
$dbid
}
)
{
printf
(
"
Not consistent: code '%d' is '%s' in file
"
.
"
but '%s' in database.
\n
",
$dbid
,
$file_codes
{
$dbid
},
$db_codes
{
$dbid
}
);
$consistent
=
0
;
}
}
...
...
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