Changeset 24827

Timestamp:

Jul 16, 2009, 3:38:14 PM (17 years ago)

Author:

jhoblitt

Message:

add a timestamp field

File:

• trunk/arclog/arclog.pl (modified) (2 diffs)

trunk/arclog/arclog.pl

@@ -40 +40 @@
 die "can not open logdb" unless $dbh;
 
-$dbh->do("CREATE TABLE IF NOT EXISTS log(record TEXT, PRIMARY KEY(record))")
+$dbh->do("CREATE TABLE IF NOT EXISTS log(stamp TEXT, record TEXT, PRIMARY KEY(record))")
     or die "db error";
 
@@ -162 +162 @@
     $a->{time} cmp $b->{time}
 } @records;
-my $query = $dbh->prepare("INSERT OR IGNORE INTO log VALUES(?)")
+my $query = $dbh->prepare("INSERT OR IGNORE INTO log(stamp, record) VALUES(DATETIME('now'), ?)")
         or die "database error: $!";