diff options
| author | Christian Pointner <equinox@helsinki.at> | 2016-07-19 21:44:38 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@helsinki.at> | 2016-07-19 21:44:38 (GMT) |
| commit | c10b740439ddcdeb4fd475e113cc439f374fc96b (patch) | |
| tree | abe7ab50005c8a86bf25314667795e33325a678a /rhautoimport-wr | |
| parent | 4fdc9672f1cdc3b8d541fd62fea196140937e6f8 (diff) | |
make usage of fetch_parse_(rss|json) easier
Diffstat (limited to 'rhautoimport-wr')
| -rwxr-xr-x | rhautoimport-wr | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rhautoimport-wr b/rhautoimport-wr index 155d428..97b38b3 100755 --- a/rhautoimport-wr +++ b/rhautoimport-wr @@ -36,7 +36,7 @@ use lib '/usr/local/share/rhautoimport/'; use rhautoimport; my $STAT_FILE = $ENV{'HOME'} . "/rhautoimport-wr.stat"; -my $RSS_URL = "https://cba.fro.at/series/werkstatt-radio/feed?c=Kfs2IoV2Wmd"; +my $RSS_URL = "https://cba.fro.at/series/werkstatt-radio/feed"; $XML::Feed::MULTIPLE_ENCLOSURES=1; my $RD_GROUP = "werkstatt"; my $PV_ID = '567'; @@ -105,7 +105,7 @@ my $bd = sprintf("%04d-%02d-%02d", @broadcast_date); print "looking for files for broadcast date $bd in RSS Feed\n"; print " -> $RSS_URL\n"; -my ($result, $feed) = rhautoimport::fetch_parse_rss($RSS_URL); +my ($result, $feed) = rhautoimport::fetch_parse_rss_cba($RSS_URL); unless ($result) { print "Error fetching feed: $feed\n"; exit 1; |