Overview
| Comment: | Fixed typo |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.60 |
| Files: | files | file ages | folders |
| SHA1: |
c48ad8efedb50a7e07024f242ed51726 |
| User & Date: | mrwellan on 2014-11-13 09:55:10 |
| Other Links: | branch diff | manifest | tags |
Context
|
2014-11-13
| ||
| 10:12 | typo check-in: 9846adb7c9 user: mrwellan tags: v1.60 | |
| 09:55 | Fixed typo check-in: c48ad8efed user: mrwellan tags: v1.60 | |
| 09:00 | bumped version to v1.6006 check-in: ed44e5d269 user: mrwellan tags: v1.60 | |
Changes
Modified db.scm from [3cfb280ece] to [2af036a052].
| ︙ | ︙ | |||
2144 2145 2146 2147 2148 2149 2150 | ;;====================================================================== ;; Misc. test related queries ;;====================================================================== (define (db:get-run-ids-matching-target dbstruct keynames target res runname testpatt statepatt statuspatt) (let* ((dbdat (db:get-db dbstruct #f)) | | | 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 | ;;====================================================================== ;; Misc. test related queries ;;====================================================================== (define (db:get-run-ids-matching-target dbstruct keynames target res runname testpatt statepatt statuspatt) (let* ((dbdat (db:get-db dbstruct #f)) (db (db:dbdat-get-db dbdat)) (row-ids '()) (keystr (string-intersperse (map (lambda (key val) (conc key " like '" val "'")) keynames (string-split target "/")) " AND ")) |
| ︙ | ︙ |