Fix include paths for static scripts.

[wloh] / sync.pl

diff --git a/sync.pl b/sync.pl
index 965b6e83a606cf8d3daeeca54de7ed9816aeb7d5..9af864217b9712c67e7fc8536779e87e69c2aa15 100755 (executable)
--- a/sync.pl
+++ b/sync.pl
@@ -5,7 +5,8 @@ use warnings;
 no warnings qw(once);
 use Encode;
 use Time::HiRes;
-require './config.pm';
+use lib qw( include );
+require 'config.pm';
 
 sub copy_escape {
        my $x = shift;
@@ -53,6 +54,7 @@ $sdbh->{RaiseError} = 1;
 sync_table($mdbh, $sdbh, "Fotballbrukere");
 sync_table($mdbh, $sdbh, "Fotballdeltagere");
 sync_table($mdbh, $sdbh, "Fotballresultater");
+sync_table($mdbh, $sdbh, "Fotballresultater_2123");
 sync_table($mdbh, $sdbh, "Fotballserier");
 
 # Just for backup.
@@ -65,5 +67,8 @@ sync_table($mdbh, $sdbh, 'Fotballspraak');
 sync_table($mdbh, $sdbh, 'Fotballtoppti');
 sync_table($mdbh, $sdbh, 'Fotballvariabler');
 
+$sdbh->do('DELETE FROM last_sync');
+$sdbh->do('INSERT INTO last_sync VALUES ( CURRENT_TIMESTAMP );');
+
 $mdbh->rollback();
 $sdbh->commit();