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

Diff of /FigKernelPackages/FigGFF.pm

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

revision 1.13, Wed Aug 3 21:47:55 2005 UTC revision 1.14, Fri Sep 16 22:05:47 2005 UTC
# Line 786  Line 786 
786      {      {
787          my($name, $value) = split(/=/, $attr);          my($name, $value) = split(/=/, $attr);
788    
789            warn "value before unescape: ", Dumper($value);
790          my @values = map { uri_unescape($_) } split(/,/, $value);          my @values = map { uri_unescape($_) } split(/,/, $value);
791            warn "values after unescape: ", Dumper(\@values);
792    
793          # handle the aliases          # handle the aliases
794          if ($name eq "Alias") {          if ($name eq "Alias") {
# Line 816  Line 818 
818    
819              $value = \@values;              $value = \@values;
820          }          }
821            else
822            {
823                $value = $values[0];
824            }
825    
826    
827          $athash->{$name} = $value;          $athash->{$name} = $value;
828    

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3