Skip to content
Snippets Groups Projects
Commit bcd90892 authored by Rhoda Kinsella's avatar Rhoda Kinsella
Browse files

Added subroutine add_synonyms used by the DBASSParser.pm

parent 32cf1ef2
No related branches found
No related tags found
No related merge requests found
......@@ -1799,6 +1799,23 @@ sub add_to_syn{
}
}
sub add_synonym{
my ($self, $xref_id, $syn) = @_;
my $add_synonym_sth;
if(!defined($add_synonym_sth)){
$add_synonym_sth = $dbi->prepare("INSERT INTO synonym VALUES(?,?)");
}
$add_synonym_sth->execute( $xref_id, $syn )
or croak( $dbi->errstr() . "\n $xref_id\n $syn\n" );
}
# --------------------------------------------------------------------------------
# Add a single record to the direct_xref table.
# Note that an xref must already have been added to the xref table (xref_id passed as 1st arg)
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment