Overview
Comment: | Fixed missing call to db:setup in -cleanup-db |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | v1.63 |
Files: | files | file ages | folders |
SHA1: |
91d7f9519db7786fcee7b872d714fbd6 |
User & Date: | mrwellan on 2016-12-07 11:05:32 |
Other Links: | branch diff | manifest | tags |
Context
2016-12-08
| ||
09:52 | Fixed call to update testdat with wrong num params check-in: 97a7ddf3ae user: mrwellan tags: v1.63 | |
2016-12-07
| ||
20:53 | merged v1.63 check-in: e25c16ede1 user: bjbarcla tags: v1.62-rpc | |
11:05 | Fixed missing call to db:setup in -cleanup-db check-in: 91d7f9519d user: mrwellan tags: v1.63 | |
2016-12-06
| ||
22:46 | Fix marking incompletes to respect run-id check-in: d19eca2c09 user: mrwellan tags: v1.63 | |
Changes
Modified megatest.scm from [46d15d3c2a] to [04febac19c].
︙ | ︙ | |||
1823 1824 1825 1826 1827 1828 1829 | (if (args:get-arg "-cleanup-db") (begin (if (not (launch:setup)) (begin (debug:print 0 *default-log-port* "Failed to setup, exiting") (exit 1))) | > | | 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 | (if (args:get-arg "-cleanup-db") (begin (if (not (launch:setup)) (begin (debug:print 0 *default-log-port* "Failed to setup, exiting") (exit 1))) (let ((dbstruct (db:setup *toppath*))) (common:cleanup-db dbstruct)) (set! *didsomething* #t))) (if (args:get-arg "-mark-incompletes") (begin (if (not (launch:setup)) (begin (debug:print 0 *default-log-port* "Failed to setup, exiting") |
︙ | ︙ |