From 1d074b59732383073cd8cfcfe995d1aa92b586f8 Mon Sep 17 00:00:00 2001
From: Daniel Matzke <post@danielmatzke.de>
Date: Mon, 9 Jul 2012 12:03:00 +0200
Subject: Encode URLs for streaming of recordings if they start with "http".

---
 vdradmind.pl | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/vdradmind.pl b/vdradmind.pl
index 0be1ee2..4194345 100755
--- a/vdradmind.pl
+++ b/vdradmind.pl
@@ -5077,6 +5077,16 @@ sub timer_delete {
     return (headerForward(RedirectToReferer("$MyURL?aktion=timer_list")));
 }
 
+sub encode_rec_stream_url {
+    my ($data) = @_;
+
+    if (substr($data, 0, 4) == "http") {
+        $data =~ s/#/%23/g;
+    }
+
+    return $data;
+}
+
 sub rec_stream {
     my ($id) = $q->param('id');
     my ($i, $title, $newtitle);
@@ -5104,6 +5114,7 @@ sub rec_stream {
             # VFAT on
             $data = findVideoFiles($minute, $hour, $day, $month, encode_RecTitle($title, 1));
         }
+        $data = encode_rec_stream_url($data);
     }
     return (header("200", $CONFIG{REC_MIMETYPE}, $data));
 }
-- 
cgit v1.2.3