From 37aa870429bceebd0b2b15c2a424de4b4ea6dfb9 Mon Sep 17 00:00:00 2001
From: Pavol Rusnak <stick@gk2.sk>
Date: Tue, 3 May 2011 16:25:31 +0200
Subject: [PATCH] print also url of videostream

---
 brmd/brmd.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/brmd/brmd.pl b/brmd/brmd.pl
index ffd8e45..cc49005 100755
--- a/brmd/brmd.pl
+++ b/brmd/brmd.pl
@@ -91,7 +91,7 @@ sub status_str {
 }
 
 sub record_str {
-	$record ? 'ON AIR' : 'OFF AIR';
+	$record ? "ON AIR\002 http://nat.brmlab.cz:8090/brmstream.asf" : 'OFF AIR';
 }
 
 sub topic_update {
@@ -119,7 +119,7 @@ sub record_update {
 	my ($newrecord) = @_;
 	$record = $newrecord;
 	my $st = record_str();
-	$irc->yield (privmsg => $channel => "[brmvideo] update (TODO): \002$st" );
+	$irc->yield (privmsg => $channel => "[brmvideo] update: \002$st" );
 }