diff options
author | Christian Pointner <equinox@helsinki.at> | 2012-01-20 23:17:45 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2012-01-20 23:17:45 (GMT) |
commit | 1dba2c5177db50e79437e221076b3c0153e10c86 (patch) | |
tree | dd55b9407548da9ea976ef87580c6310d0e52a42 /rhimport-wl | |
parent | 5c15154a15840173ca8167bb0bbb3db32290ce41 (diff) |
simpler interface to pv_add_note
Diffstat (limited to 'rhimport-wl')
-rwxr-xr-x | rhimport-wl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/rhimport-wl b/rhimport-wl index 6c2d314..492460d 100755 --- a/rhimport-wl +++ b/rhimport-wl @@ -42,7 +42,7 @@ my $DB = "rivendell"; my $STAT_FILE = $ENV{'HOME'} . "/rhimport-wl.stat"; my $RSS_URL = "http://www.radiowienerlied.at/rss/podcast.xml"; -my @PV_SCRIPT = ('/usr/bin/ssh', 'root@intranet', 'addnote', '82'); +my @PV_ID = '82'; binmode(STDIN, ":utf8"); binmode(STDOUT, ":utf8"); @@ -97,10 +97,8 @@ for my $entry ($feed->entries) { print "summary:\n" . $sum_title . "\n\n" . $sum_text . "\n"; - my @tomorrow = Date::Calc::Add_Delta_Days($today[0], $today[1], $today[2], 1); - push(@PV_SCRIPT, sprintf("%04d-%02d-%02d", $tomorrow[0], $tomorrow[1], $tomorrow[2])); - rhimport::pv_add_note($sum_title, $sum_text, @PV_SCRIPT); + rhimport::pv_add_note($sum_title, $sum_text, $PV_ID, sprintf("%04d-%02d-%02d", $tomorrow[0], $tomorrow[1], $tomorrow[2])); print "\n"; } } |