diff options
| author | Nick White <git@njw.me.uk> | 2012-04-21 15:57:10 +0100 |
|---|---|---|
| committer | Nick White <git@njw.me.uk> | 2012-04-21 15:57:10 +0100 |
| commit | 903eec3fd54f5fb2928131c8e6f51a9cfd9026b6 (patch) | |
| tree | d67d106db87f9c9903343e3e25b3b3684071e79d /getxbookgui.tcl | |
| parent | 5c4aa011033ee1963e042a4d51d9eaa00216396b (diff) | |
Fixed clipboard url match pattern for google books
Diffstat (limited to 'getxbookgui.tcl')
| -rwxr-xr-x | getxbookgui.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/getxbookgui.tcl b/getxbookgui.tcl index 571171a..a587ea0 100755 --- a/getxbookgui.tcl +++ b/getxbookgui.tcl @@ -40,7 +40,7 @@ proc parseurl {url} { set bookid "" if { [string match "http*://books.google.com/*" "$url"] } { selbin 0 - if {[regexp {bookid=([^&]*)} $url m sub]} { + if {[regexp {[&?]id=([^&]*)} $url m sub]} { set bookid $sub } } elseif { [string match "http*://*amazon*/*" "$url"] } { |