From 084fdb616dcadb6d07c9e9942126b071ceef976a Mon Sep 17 00:00:00 2001
From: Monsieur Video <monsieurvideo@gmail.com>
Date: Sun, 15 Nov 2009 16:40:13 +0000
Subject: [PATCH] Fix apple support for some videos.

---
 FlashVideo/Site/Apple.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FlashVideo/Site/Apple.pm b/FlashVideo/Site/Apple.pm
index 86c0e0db..6e105636 100644
--- a/FlashVideo/Site/Apple.pm
+++ b/FlashVideo/Site/Apple.pm
@@ -30,7 +30,7 @@ sub handle_mov {
   # I'm an iPhone (not a PC)
   $browser->agent("Apple iPhone OS v2.0.1 CoreMedia v1.0.0.5B108");
 
-  if($browser->content =~ /url\s*\0+[\1-!]*(.*?)\0/) {
+  if($browser->content =~ /url\s*\0+[\1-,]*(.*?)\0/) {
     return URI->new_abs($1, $browser->uri)
   } else {
     die "Cannot find link in .mov";