[system] / trunk / pg / macros / parserMultiPart.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/parserMultiPart.pl

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

Revision 3270 Revision 3371
130); 130);
131 131
132sub new { 132sub new {
133 my $self = shift; my $class = ref($self) || $self; 133 my $self = shift; my $class = ref($self) || $self;
134 my @data = @_; my @cmp; 134 my @data = @_; my @cmp;
135 Value::Error($class." lists can't be empty") if scalar(@data) == 0; 135 Value::Error("%s lists can't be empty",$class) if scalar(@data) == 0;
136 foreach my $x (@data) { 136 foreach my $x (@data) {
137 $x = Value::makeValue($x) unless Value::isValue($x); 137 $x = Value::makeValue($x) unless Value::isValue($x);
138 push(@cmp,$x->cmp(@ans_defaults)); 138 push(@cmp,$x->cmp(@ans_defaults));
139 } 139 }
140 bless { 140 bless {

Legend:
Removed from v.3270  
changed lines
  Added in v.3371

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9