[Konversation-devel] [Bug 99354] Googling from the input box
ismail cartman donmez
ismail at kde.org.tr
Sun Feb 20 08:37:34 CET 2005
------- You are receiving this mail because: -------
You are the assignee for the bug, or are watching the assignee.
http://bugs.kde.org/show_bug.cgi?id=99354
------- Additional Comments From ismail kde org tr 2005-02-20 08:37 -------
CVS commit by cartman:
Use CGI::escape
CCBUG:99354
M +4 -3 google 1.8
--- kdeextragear-2/konversation/scripts/google #1.7:1.8
@ -5,4 +5,5 @
use warnings;
use Getopt::Long;
+use CGI qw(:standard);
my $PORT=shift;
@ -51,5 +52,5 @
{
$query = join(" ", ARGV);
- $query =~ s/\&/\%26/g;
+ $query = CGI::escape($query);
$url="http://www.google.com/search?q=$query";
exec 'kfmclient','openURL',$url;
@ -58,7 +59,6 @
{
$search = join(" ",$search, ARGV);
-
system 'dcop', $PORT, 'Konversation', 'info', "Searching Google for \x02$search\x02 ...";
-
+
$googleSearch = SOAP::Lite->service("http://api.google.com/GoogleSearch.wsdl");
$result = $googleSearch->doGoogleSearch($key, $search, 0, 10, "false", "", "false", "", "UTF-8", "UTF-8");
@ -84,4 +84,5 @
{
$spellcheck = join(" ",$spellcheck, ARGV);
+
system 'dcop', $PORT, 'Konversation', 'info', "Spellchecking \x02$spellcheck\x02 ...";
$googleSearch = SOAP::Lite->service("http://api.google.com/GoogleSearch.wsdl");
More information about the Konversation-devel
mailing list