Overview
| Comment: | Remove noise |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.80 |
| Files: | files | file ages | folders |
| SHA1: |
49abec32c1222e2ec62f45b71827f4b0 |
| User & Date: | matt on 2023-03-11 20:47:10 |
| Other Links: | branch diff | manifest | tags |
Context
|
2023-03-12
| ||
| 08:54 | Fixed no-sync-db crash check-in: d79897a765 user: matt tags: v1.80 | |
|
2023-03-11
| ||
| 20:47 | Remove noise check-in: 49abec32c1 user: matt tags: v1.80 | |
| 17:12 | This seems to be working but it should not. check-in: ab6d2aae1a user: matt tags: v1.80 | |
Changes
Modified dbmod.scm from [78e6f0cb09] to [a058eba350].
| ︙ | ︙ | |||
396 397 398 399 400 401 402 |
(stmt1 (conc "INSERT OR IGNORE INTO "todb table
" SELECT * FROM "fromdb table";"))
(stmt8 (conc "UPDATE "todb table" SET ("no-id-fields-str") = (SELECT "no-id-fields-str" FROM "fromdb table" WHERE "todb table".id="fromdb table".id"
(if (member "last_update" fields)
(conc " AND "fromdb table".last_update > "todb table".last_update);")
");")))
(start-ms (current-milliseconds)))
| | | 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 |
(stmt1 (conc "INSERT OR IGNORE INTO "todb table
" SELECT * FROM "fromdb table";"))
(stmt8 (conc "UPDATE "todb table" SET ("no-id-fields-str") = (SELECT "no-id-fields-str" FROM "fromdb table" WHERE "todb table".id="fromdb table".id"
(if (member "last_update" fields)
(conc " AND "fromdb table".last_update > "todb table".last_update);")
");")))
(start-ms (current-milliseconds)))
;; (debug:print 0 *default-log-port* "stmt8="stmt8)
(if (sqlite3:auto-committing? dbh)
(begin
(sqlite3:with-transaction
dbh
(lambda ()
(sqlite3:execute dbh stmt1) ;; get all new rows
|
| ︙ | ︙ |