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

Diff of /FigKernelPackages/FIGMODELObject.pm

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

revision 1.3, Wed Apr 29 19:52:47 2009 UTC revision 1.4, Wed Apr 21 22:18:05 2010 UTC
# Line 256  Line 256 
256          }          }
257  }  }
258    
259    =head3 rename_heading
260    
261    Definition:
262            FIGMODELObject->rename_heading(string:old name,string:new name);
263    Description:
264            Renames a heading
265    
266    =cut
267    sub rename_heading {
268            my ($self,$old,$new) = @_;
269            for (my $i=0; $i < @{$self->headings()}; $i++) {
270                    if ($self->headings()->[$i] eq $old) {
271                            $self->headings()->[$i] = $new;
272                            $self->{$new} = $self->{$old};
273                    }
274            }
275    }
276    
277  =head3 add_headings  =head3 add_headings
278  Definition:  Definition:
279          $Object->add_headings(@Headings);          $Object->add_headings(@Headings);

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3