Changeset 2320

Show
Ignore:
Timestamp:
08/29/07 19:04:16
Author:
miyagawa
Message:

Checking in changes prior to tagging of version 0.02. Changelog diff is:

=== Changes
==================================================================
--- Changes (revision 1164)
+++ Changes (local)
@@ -1,4 +1,8 @@

Revision history for Perl extension WebService?::Google
Suggest

+0.02 Wed Aug 29 03:02:28 PDT 2007
+ - Fixed per Google Suggest JavaScript? updates
+ (Thanks to Lorimier Loic)
+

0.01 Sat Dec 11 22:18:56 2004
- original version

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • WebService-Google-Suggest/trunk/Changes

    r1503 r2320  
    11Revision history for Perl extension WebService::Google::Suggest 
     2 
     30.02  Wed Aug 29 03:02:28 PDT 2007 
     4        - Fixed per Google Suggest JavaScript updates 
     5          (Thanks to Lorimier Loic) 
    26 
    370.01  Sat Dec 11 22:18:56 2004 
  • WebService-Google-Suggest/trunk/lib/WebService/Google/Suggest.pm

    r1503 r2320  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = '0.01'; 
     5$VERSION = '0.02'; 
    66 
    77use Carp; 
     
    2929 
    3030    my $content = $response->content(); 
    31     $content =~ /^sendRPCDone\(frameElement, ".*?", new Array\((.*?)\), new Array\((.*?)\), new Array\(""\)\)\;$/ 
     31    $content =~ /^window\.google\.ac\.sendRPCDone\(frameElement, ".*?", new Array\((.*?)\), new Array\((.*?)\), new Array\(""\)\)\;$/ 
    3232        or croak "Google returns unrecognized format: $content"; 
    3333    my($queries, $results) = ($1, $2);