iwla

iwla Commit Details

Date:2017-09-05 08:07:23 (2 years 10 months ago)
Author:Grégory Soutadé
Branch:dev, master
Commit:4466d9ac1d3fd5f84e2ec1c1d2fc5a5430b27fb3
Parents: 9f9bfebe7a778c362dccdaeae4a4da2979cceecd
Message:Fix iwla_convert.pl : skip empty key in hashs. Checks for empty lists

Changes:
Mtools/iwla_convert.pl (4 diffs)

File differences

tools/iwla_convert.pl
1717
1818
1919
20
2021
2122
2223
......
3738
3839
3940
41
4042
4143
4244
......
5658
5759
5860
59
61
6062
6163
6264
......
6567
6668
6769
68
70
6971
7072
7173
foreach $r (@list)
{
$r =~ s/\'/\\\'/g;
if ($first == 0)
{
print $FIC ", ";
while( my ($k,$v) = each(%hash) ) {
$k =~ s/\'/\\\'/g;
$v =~ s/\'/\\\'/g;
next if ($k == "" || $v == "");
if ($first == 0)
{
print $FIC ", ";
print $FIC "robots = [";
dumpList(\@RobotsSearchIDOrder_list1, $FIC, 1);
dumpList(\@RobotsSearchIDOrder_list2, $FIC, 0);
dumpList(\@RobotsSearchIDOrder_list2, $FIC, (@RobotsSearchIDOrder_list1 == 0) ? 1 : 0);
print $FIC "]\n\n";
print $FIC "search_engines = [";
print $FIC "search_engines_2 = [";
dumpList(\@SearchEnginesSearchIDOrder_list2, $FIC, 1);
dumpList(\@Own_SearchEnginesSearchIDOrder, $FIC, 0);
dumpList(\@Own_SearchEnginesSearchIDOrder, $FIC, (@SearchEnginesSearchIDOrder_list2 == 0) ? 1 : 0);
print $FIC "]\n\n";
print $FIC "not_search_engines_keys = {";

Archive Download the corresponding diff file

Branches

Tags