[system] / trunk / pg / lib / Value / Interval.pm Repository:
ViewVC logotype

Diff of /trunk/pg/lib/Value/Interval.pm

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

Revision 5238 Revision 5239
136# 136#
137sub transferFlags { 137sub transferFlags {
138 my $self = shift; 138 my $self = shift;
139 foreach my $flag (@_) { 139 foreach my $flag (@_) {
140 next unless defined $self->{$flag}; 140 next unless defined $self->{$flag};
141 foreach my $i (1,2) {$self->{data}[$i]->{$flag} = $self->{$flag}} 141 foreach my $i (0,1) {$self->{data}[$i]->{$flag} = $self->{$flag}}
142 } 142 }
143} 143}
144 144
145# 145#
146# Convert points and lists to intervals, when needed 146# Convert points and lists to intervals, when needed

Legend:
Removed from v.5238  
changed lines
  Added in v.5239

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9