From: Aleš Křenek Date: Wed, 23 Apr 2008 15:35:54 +0000 (+0000) Subject: use CheckedString X-Git-Tag: glite-yaim-lb_R_4_0_2_1~65 X-Git-Url: http://scientific.zcu.cz/git/?a=commitdiff_plain;h=a1e1fc661ce8a6c9d9ccd2402d28960e0a30d02f;p=jra1mw.git use CheckedString --- diff --git a/org.glite.lb.client-java/project/genEventTypes.pl b/org.glite.lb.client-java/project/genEventTypes.pl index 645a50a..672e7b5 100644 --- a/org.glite.lb.client-java/project/genEventTypes.pl +++ b/org.glite.lb.client-java/project/genEventTypes.pl @@ -83,11 +83,14 @@ qq{ public String ulm() \{ for ($event->getFieldsOrdered) { my $f = selectField $event $_; my $fn = $f->{name}; + my $t = getType $f; my $fnu = ucfirst $fn; my $fnuu = uc $fn; + my $val = $t eq 'String' ? + "new CheckedString($fn).toString()" : $fn; print E -qq{ "DG.$uuc.$fnuu=\\"" + $fn + "\\"" + +qq{ "DG.$uuc.$fnuu=\\"" + $val + "\\"" + }; }