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

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

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

Revision 2726 Revision 3371
20 20
21sub _check { 21sub _check {
22 my $self = shift; 22 my $self = shift;
23 $self->SUPER::_check; 23 $self->SUPER::_check;
24 my $uop = $self->{def}{string} || $self->{uop}; 24 my $uop = $self->{def}{string} || $self->{uop};
25 $self->Error("Can't use '$uop' in this context") 25 $self->Error("Can't use '%s' in this context",$uop)
26 unless $self->{op}->class eq 'Number'; 26 unless $self->{op}->class eq 'Number';
27} 27}
28 28
29package main; 29package main;
30 30

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

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9