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-po | |
| parent | 4fdc9672f1cdc3b8d541fd62fea196140937e6f8 (diff) | |
make usage of fetch_parse_(rss|json) easier
Diffstat (limited to 'rhautoimport-po')
| -rwxr-xr-x | rhautoimport-po | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rhautoimport-po b/rhautoimport-po index 5f9372b..8d3caeb 100755 --- a/rhautoimport-po +++ b/rhautoimport-po @@ -36,7 +36,7 @@ use lib '/usr/local/share/rhautoimport/'; use rhautoimport; my $STAT_FILE = $ENV{'HOME'} . "/rhautoimport-po.stat"; -my $RSS_URL = "https://cba.fro.at/series/panoptikum-bildung/feed?c=Kfs2IoV2Wmd"; +my $RSS_URL = "https://cba.fro.at/series/panoptikum-bildung/feed"; $XML::Feed::MULTIPLE_ENCLOSURES=1; my $RD_GROUP = "panoptikum"; my $PV_ID = '570'; @@ -109,7 +109,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; |