remove reference to freshmeat_search.pl

[claws.git] / tools / thunderbird-filters-convertor.pl

diff --git a/tools/thunderbird-filters-convertor.pl b/tools/thunderbird-filters-convertor.pl
old mode 100644 (file)
new mode 100755 (executable)
index 7a42066..d49cfea
--- a/tools/thunderbird-filters-convertor.pl
+++ b/tools/thunderbird-filters-convertor.pl
@@ -6,7 +6,7 @@ use URI::Escape;
 
 #  * This file is free software; you can redistribute it and/or modify it
 #  * under the terms of the GNU General Public License as published by
-#  * the Free Software Foundation; either version 2 of the License, or
+#  * the Free Software Foundation; either version 3 of the License, or
 #  * (at your option) any later version.
 #  *
 #  * This program is distributed in the hope that it will be useful, but
@@ -359,6 +359,7 @@ sub convert_filters {
                                        $cond =~ s/\) OR$//;
                                        $cond =~ s/\) AND$//;
                                        $cond =~ s/\)"$//;
+                                       $cond =~ s/\\"/"/g;
                                        my ($cpart_one, $cpart_two, $cpart_thr) = split(/,/, $cond, 3);
                                        if ($cond) {
                                                if ($cpart_one =~ m/$exact_matches/) {
@@ -375,7 +376,7 @@ sub convert_filters {
                                                        $part_one = $claws_condition = $part_three = $part_four = "";
                                                        next;
                                                } else {
-                                                       $claws_condition = "head";
+                                                       $claws_condition = "header $cpart_one";
                                                }
 
                                                if ($cpart_two eq "doesn't contain") {