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-er | |
parent | 4fdc9672f1cdc3b8d541fd62fea196140937e6f8 (diff) |
make usage of fetch_parse_(rss|json) easier
Diffstat (limited to 'rhautoimport-er')
-rwxr-xr-x | rhautoimport-er | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rhautoimport-er b/rhautoimport-er index 31033db..bca53d8 100755 --- a/rhautoimport-er +++ b/rhautoimport-er @@ -36,7 +36,7 @@ use rhautoimport; my $STAT_FILE = $ENV{'HOME'} . "/rhautoimport-er.stat"; my $LAST_FILE = $ENV{'HOME'} . "/rhautoimport-er.last"; -my $RSS_URL = "https://cba.fro.at/series/ergo/feed?c=Kfs2IoV2Wmd"; +my $RSS_URL = "https://cba.fro.at/series/ergo/feed"; $XML::Feed::MULTIPLE_ENCLOSURES=1; my $RD_GROUP = "ergo"; my $PV_ID = '569'; @@ -103,7 +103,7 @@ print " -> $RSS_URL\n"; my $bdnumexp = "^Ergo\\s+#(\\d+)\\s*:"; -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; |