[TWiki-Dev] [SVN] r6567 - in twiki/branches/DEVELOP: . lib

[<Ant...@nt...>]

Author: AntonioTerceiro
Date: 2005-09-23 21:58:53 -0700 (Fri, 23 Sep 2005)
New Revision: 6567

Modified:
   twiki/branches/DEVELOP/
   twiki/branches/DEVELOP/lib/TWiki.pm
Log:
Item000: trying to fix "Use of uninitialized value in split" error in develop.twiki.org
 



Property changes on: twiki/branches/DEVELOP
___________________________________________________________________
Name: svk:merge
   - 6fe119f3-adff-0310-8d65-eaf721ad8dcd:/local/twiki:9496
   + 6fe119f3-adff-0310-8d65-eaf721ad8dcd:/local/twiki:9498

Modified: twiki/branches/DEVELOP/lib/TWiki.pm
===================================================================
--- twiki/branches/DEVELOP/lib/TWiki.pm	2005-09-24 04:55:33 UTC (rev 6566)
+++ twiki/branches/DEVELOP/lib/TWiki.pm	2005-09-24 04:58:53 UTC (rev 6567)
@@ -2822,7 +2822,7 @@
     $str =~ s/~\[(\*,\_\d+,[^,]+(,([^,]+))?)~\]/[$1]/g;
 
     # get the args to be interpolated.
-    my @args = split (/\s*,\s*/, $params->{args}) ;
+    my @args = split (/\s*,\s*/, $params->{args} || "") ;
 
     # do the magic:
     return $this->{i18n}->maketext($str, @args);