diff options
Diffstat (limited to 'rhimport-rs')
| -rwxr-xr-x | rhimport-rs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/rhimport-rs b/rhimport-rs index 26c8f4a..276d612 100755 --- a/rhimport-rs +++ b/rhimport-rs @@ -40,7 +40,7 @@ my $DBUSER = "rivendell"; my $DBPW = "lldriven"; my $DB = "rivendell"; -my $STAT_FILE = $ENV{'HOME'} . "/rhimport-wl.stat"; +my $STAT_FILE = $ENV{'HOME'} . "/rhimport-rs.stat"; my $RSS_URL = "http://cba.fro.at/seriesrss/197"; my @PV_SCRIPT = ('/usr/bin/ssh', 'root@intranet', 'addnote', '75'); my @PV_SCRIPT_REB = ('/usr/bin/ssh', 'root@intranet', 'addnote', '75'); @@ -136,11 +136,11 @@ for my $entry ($feed->entries) { } print "\n"; - push(@PV_SCRIPT, sprintf("%04d-%02d-%02d", $import_date_reb[0], $import_date_reb[1], $import_date_reb[2])); + push(@PV_SCRIPT_REB, sprintf("%04d-%02d-%02d", $import_date_reb[0], $import_date_reb[1], $import_date_reb[2])); ($reader, $writer, $error ) = ( new IO::Handle, new IO::Handle, new IO::Handle ); $writer->autoflush(1); local $SIG{CHLD} = 'DEFAULT'; - $pid = open3($writer, $reader, $error, @PV_SCRIPT); + $pid = open3($writer, $reader, $error, @PV_SCRIPT_REB); binmode($reader, ":utf8"); binmode($writer, ":utf8"); binmode($error, ":utf8"); |