From 2803e3eb9c629de19cccb51a981456fb62f8cfe0 Mon Sep 17 00:00:00 2001
From: Steffen Forkmann <steffen.forkmann@msu-solutions.de>
Date: Fri, 21 Dec 2018 21:02:34 +0100
Subject: [PATCH] Bumping version to 1.0.6

---
 RELEASE_NOTES.md           |  2 +-
 src/Client/ReleaseNotes.fs |  4 ++--
 src/Server/Server.fs       | 14 ++++++++++++++
 3 files changed, 17 insertions(+), 3 deletions(-)

diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
index 73b6bd4..c31e2dd 100644
--- a/RELEASE_NOTES.md
+++ b/RELEASE_NOTES.md
@@ -1,6 +1,6 @@
 # Release Notes
 
-## 1.0.5 - 2018-12-21
+## 1.0.6 - 2018-12-21
 * Christmas edition
 
 ## 0.16.25 - 2018-12-18
diff --git a/src/Client/ReleaseNotes.fs b/src/Client/ReleaseNotes.fs
index e39ee81..8e744b8 100644
--- a/src/Client/ReleaseNotes.fs
+++ b/src/Client/ReleaseNotes.fs
@@ -1,13 +1,13 @@
 module internal ReleaseNotes
 
-let Version = "1.0.5"
+let Version = "1.0.6"
 
 let IsPrerelease = false
 
 let Notes = """
 # Release Notes
 
-## 1.0.5 - 2018-12-21
+## 1.0.6 - 2018-12-21
 * Christmas edition
 
 ## 0.16.25 - 2018-12-18
diff --git a/src/Server/Server.fs b/src/Server/Server.fs
index 31ec19d..d99e9b8 100644
--- a/src/Server/Server.fs
+++ b/src/Server/Server.fs
@@ -199,6 +199,18 @@ let youtubeEndpoint =
     pipeline {
         set_header "Content-Type" "application/json"
         plug (fun next ctx -> task {
+            
+            let! tags = getAllTags()
+            for tag in tags do
+                match tag.Action with
+                | TagAction.PlayYoutube url ->
+                    let! _,urls = discoverYoutubeLink url
+                    let urls =
+                        urls
+                        |> Array.filter (fun x -> x.Contains "&mime=audio")
+                    let! _ = saveLinks tag urls
+                    ()
+                | _ -> ()
             let! _,urls = discoverYoutubeLink "https://www.youtube.com/watch?v=DeTePthFfDY"
             let txt = sprintf "%A" urls
             return! setBodyFromString txt next ctx
@@ -261,4 +273,6 @@ let discoverTask = task {
     return ()
 }
 
+discoverTask.Start()
+
 run app