[Namazu-cvs 1491] r277 - Search-Namazu/trunk/Search-Namazu

[cvsd ＠ vaj.namazu.org]

Author: knok
Date: 2007-03-20 13:33:36 +0900 (Tue, 20 Mar 2007)
New Revision: 277

Modified:
   Search-Namazu/trunk/Search-Namazu/ChangeLog
   Search-Namazu/trunk/Search-Namazu/Namazu.pm
Log:
Added missing initialization.


Modified: Search-Namazu/trunk/Search-Namazu/ChangeLog
===================================================================
--- Search-Namazu/trunk/Search-Namazu/ChangeLog	2007-03-20 04:33:26 UTC (rev 276)
+++ Search-Namazu/trunk/Search-Namazu/ChangeLog	2007-03-20 04:33:36 UTC (rev 277)
@@ -1,3 +1,11 @@
+2007-03-20  NOKUBI Takatsugu  <knok ＠ daionet.gr.jp>
+
+	* Namazu.pm (Search): Added missing initialization.
+
+2006-06-09  NOKUBI Takatsugu  <knok ＠ daionet.gr.jp>
+
+	* Namazu.xs: Fixed segfault bug on perl 5.005_03.
+
 2006-06-06  NOKUBI Takatsugu  <knok ＠ daionet.gr.jp>
 
 	* Namazu.xs: Define SvPV_nolen if it is not defined.

Modified: Search-Namazu/trunk/Search-Namazu/Namazu.pm
===================================================================
--- Search-Namazu/trunk/Search-Namazu/Namazu.pm	2007-03-20 04:33:26 UTC (rev 276)
+++ Search-Namazu/trunk/Search-Namazu/Namazu.pm	2007-03-20 04:33:36 UTC (rev 277)
@@ -287,9 +287,9 @@
     my $lang = $args{'lang'};
     my $query = $args{'query'};
     my $maxhit = $args{'maxhit'} || 10000;
-    my $returnas = $args{'returnas'};
+    my $returnas = $args{'returnas'} || '';
     my $maxget = $args{'maxget'} || $maxhit;
-    my $fields = $args{'fields'};
+    my $fields = $args{'fields'} || 0;
 
 # initialize