From 2a0910f9bad0fd034e55d29770e246698f601a7e Mon Sep 17 00:00:00 2001 From: Paul Mangan Date: Thu, 1 Feb 2007 17:58:28 +0000 Subject: [PATCH] 2007-02-01 [paul] 2.7.2cvs13 * AUTHORS * src/gtk/authors.h * tools/freshmeat_search.pl * tools/google_search.pl * tools/multiwebsearch.pl add support for non ISO-8859-1 compatible locales Patch by Alex Gorbachenko --- AUTHORS | 1 + ChangeLog | 10 ++++++++++ PATCHSETS | 1 + configure.ac | 2 +- src/gtk/authors.h | 1 + tools/freshmeat_search.pl | 19 +++++++++++++++++-- tools/google_search.pl | 19 +++++++++++++++++-- tools/multiwebsearch.pl | 17 +++++++++++++++-- 8 files changed, 63 insertions(+), 7 deletions(-) diff --git a/AUTHORS b/AUTHORS index 3ee644e38..2cdaa019b 100644 --- a/AUTHORS +++ b/AUTHORS @@ -238,3 +238,4 @@ contributors (in addition to the above; based on Changelog) Michael Hughes Jindrich Makovicka Pascal Terjan + Alex Gorbachenko diff --git a/ChangeLog b/ChangeLog index 16ed6d390..601c53bea 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,13 @@ +2007-02-01 [paul] 2.7.2cvs13 + + * AUTHORS + * src/gtk/authors.h + * tools/freshmeat_search.pl + * tools/google_search.pl + * tools/multiwebsearch.pl + add support for non ISO-8859-1 compatible locales + Patch by Alex Gorbachenko + 2007-02-01 [colin] 2.7.2cvs12 * src/prefs_other.c diff --git a/PATCHSETS b/PATCHSETS index 99c222929..e7cce2037 100644 --- a/PATCHSETS +++ b/PATCHSETS @@ -2330,3 +2330,4 @@ ( cvs diff -u -r 1.9.2.11 -r 1.9.2.12 src/addressadd.c; cvs diff -u -r 1.65.2.55 -r 1.65.2.56 src/codeconv.c; cvs diff -u -r 1.96.2.166 -r 1.96.2.167 src/textview.c; ) > 2.7.2cvs10.patchset ( cvs diff -u -r 1.14.2.50 -r 1.14.2.51 src/plugins/trayicon/trayicon.c; ) > 2.7.2cvs11.patchset ( cvs diff -u -r 1.1.2.17 -r 1.1.2.18 src/prefs_other.c; cvs diff -u -r 1.1.2.35 -r 1.1.2.36 src/prefs_summaries.c; ) > 2.7.2cvs12.patchset +( cvs diff -u -r 1.100.2.47 -r 1.100.2.48 AUTHORS; cvs diff -u -r 1.1.2.32 -r 1.1.2.33 src/gtk/authors.h; cvs diff -u -r 1.3.2.5 -r 1.3.2.6 tools/freshmeat_search.pl; cvs diff -u -r 1.3.2.5 -r 1.3.2.6 tools/google_search.pl; cvs diff -u -r 1.3.2.5 -r 1.3.2.6 tools/multiwebsearch.pl; ) > 2.7.2cvs13.patchset diff --git a/configure.ac b/configure.ac index 18e89b688..ae4b14556 100644 --- a/configure.ac +++ b/configure.ac @@ -11,7 +11,7 @@ MINOR_VERSION=7 MICRO_VERSION=2 INTERFACE_AGE=0 BINARY_AGE=0 -EXTRA_VERSION=12 +EXTRA_VERSION=13 EXTRA_RELEASE= EXTRA_GTK2_VERSION= diff --git a/src/gtk/authors.h b/src/gtk/authors.h index 93ad6619c..28e706b21 100644 --- a/src/gtk/authors.h +++ b/src/gtk/authors.h @@ -111,6 +111,7 @@ static char *CONTRIBS_LIST[] = { "Stoyan Genov", "Thomas Gilgin", "Thierry Godefroy", +"Alex Gorbachenko", "Yang Guilong", "Daniel Gustafson", "HIROSHIMA", diff --git a/tools/freshmeat_search.pl b/tools/freshmeat_search.pl index 1c9bed0f2..2177abecc 100644 --- a/tools/freshmeat_search.pl +++ b/tools/freshmeat_search.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -# * Copyright 2003 Paul Mangan +# * Copyright 2003-2007 Paul Mangan # * # * 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 @@ -17,9 +17,24 @@ # * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. # * +# Changes: +# Feb 2007: add support for non ISO-8859-1 compatible locales +# by Alex Gorbachenko +# + +use URI::Escape; +use POSIX qw(locale_h); +use Text::Iconv; + my $freshmeat = "http://freshmeat.net/search?q"; $_ = <>; +$locale = setlocale(LC_CTYPE); +$locale =~ s/\S+\.//; + +$converter = Text::Iconv->new("$locale", "UTF-8"); +$safe=uri_escape($converter->convert("$_")); + chdir($ENV{HOME} . "/.claws-mail") || die("Can't find your .claws-mail directory\n"); open (SYLRC, " +# * Copyright 2003-2007 Paul Mangan # * # * 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 @@ -17,9 +17,24 @@ # * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. # * +# Changes: +# Feb 2007: add support for non ISO-8859-1 compatible locales +# by Alex Gorbachenko +# + +use URI::Escape; +use POSIX qw(locale_h); +use Text::Iconv; + my $google = "http://www.google.com/search?q"; $_ = <>; +$locale = setlocale(LC_CTYPE); +$locale =~ s/\S+\.//; + +$converter = Text::Iconv->new("$locale", "UTF-8"); +$safe=uri_escape($converter->convert("$_")); + chdir($ENV{HOME} . "/.claws-mail") || die("Can't find your .claws-mail directory\n"); open (SYLRC, " +# * Copyright 2003-2007 Paul Mangan # * # * 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 @@ -17,7 +17,15 @@ # * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. # * +# Changes: +# Feb 2007: add support for non ISO-8859-1 compatible locales +# by Alex Gorbachenko +# + use Getopt::Long; +use URI::Escape; +use POSIX qw(locale_h); +use Text::Iconv; my $where = ''; my $what = ''; @@ -25,7 +33,12 @@ my $what = ''; GetOptions("where=s" => \$where, "what=s" => \$what); -$what =~ s/\s/%20/g; +$locale = setlocale(LC_CTYPE); +$locale =~ s/\S+\.//; + +$converter = Text::Iconv->new("$locale", "UTF-8"); +$safe=uri_escape($converter->convert("$what")); +$what=$safe; chdir($ENV{HOME} . "/.claws-mail") || die("Can't find your ~/.claws-mail directory\n"); -- 2.25.1