From 0437b1deb77761a06685eec5afe09f747e5cbe77 Mon Sep 17 00:00:00 2001
From: Ralf Ertzinger <ralf@skytale.net>
Date: Sun, 8 May 2011 13:13:40 +0200
Subject: [PATCH] Wimp: adapt to new player

---
 videosite/WimpGrabber.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/videosite/WimpGrabber.pm b/videosite/WimpGrabber.pm
index 8d37766..cda5a95 100644
--- a/videosite/WimpGrabber.pm
+++ b/videosite/WimpGrabber.pm
@@ -72,7 +72,7 @@ sub _parse {
 
     # Look for the download URL
     foreach $e (@text) {
-        if ($e->[0] =~ m|\.addVariable\("file",\s*"([^\x22]+)"\)|) {
+        if ($e->[0] =~ m|\.setup\(.*file:\s*"([^\x22]+)"|) {
             $metadata->{'DLURL'} = $1;
         }
     }
-- 
1.8.3.1