[Bio] / FigKernelPackages / FIG.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/FIG.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.343, Mon Aug 15 20:25:02 2005 UTC revision 1.344, Mon Aug 15 21:16:19 2005 UTC
# Line 7147  Line 7147 
7147      return unless ($peg && $k); # we must have at least a peg and a tag to add (though other things can be undef)      return unless ($peg && $k); # we must have at least a peg and a tag to add (though other things can be undef)
7148      $k =  $self->clean_attribute_key($k);      $k =  $self->clean_attribute_key($k);
7149      my $rdbH = $self->db_handle;      my $rdbH = $self->db_handle;
7150      $rdbH->SQL("INSERT INTO attribute ( fid,tag,val,url ) VALUES ( '$peg','$k','$v','$url')");      $rdbH->SQL("INSERT INTO attribute ( fid,tag,val,url ) VALUES ( ?,?,?,?)", undef, $peg,$k,$v,$url);
7151      my $location=$self->attribute_location($peg);      my $location=$self->attribute_location($peg);
7152      &verify_dir("$location");      &verify_dir("$location");
7153      if (!$notl && open(TMPATTR,">>$location/transaction_log"))      if (!$notl && open(TMPATTR,">>$location/transaction_log"))

Legend:
Removed from v.1.343  
changed lines
  Added in v.1.344

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3