Overview
| Comment: | added pgsync via command line creds |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | v1.64 |
| Files: | files | file ages | folders |
| SHA1: |
5d1a6894bb9bf483a9b22ceca602bec7 |
| User & Date: | srehman on 2017-03-16 12:13:05 |
| Other Links: | branch diff | manifest | tags |
Context
|
2017-03-20
| ||
| 15:14 | fixed issues related to PWD not matching -start-dir argument check-in: 75dc576fb1 user: bjbarcla tags: v1.64 | |
| 12:12 | missing server fix commit Closed-Leaf check-in: 74d9575642 user: matt tags: server-fix | |
|
2017-03-16
| ||
| 12:13 | added pgsync via command line creds check-in: 5d1a6894bb user: srehman tags: v1.64 | |
|
2017-03-15
| ||
| 17:32 | added flag to allow adding prefix to target check-in: 1fee8d8e98 user: srehman tags: v1.64 | |
Changes
Modified cgisetup/models/pgdb.scm from [c3a02037dc] to [0f76410646].
| ︙ | ︙ | |||
24 25 26 27 28 29 30 | ;; (import chicken) (use typed-records (prefix dbi dbi:)) ;; given a configdat lookup the connection info and open the db ;; (define (pgdb:open configdat #!key (dbname #f)) | | | 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
;; (import chicken)
(use typed-records (prefix dbi dbi:))
;; given a configdat lookup the connection info and open the db
;;
(define (pgdb:open configdat #!key (dbname #f))
(let ((pgconf (or (configf:lookup configdat "ext-sync" (or dbname "pgdb")) (args:get-arg "-pgsync"))))
(if pgconf
(let* ((confdat (map (lambda (conf-item)
(let ((parts (string-split conf-item ":")))
(if (> (length parts) 1)
(let ((key (car parts))
(val (cadr parts)))
(cons (string->symbol key) val))
|
| ︙ | ︙ |
Modified megatest.scm from [eda3e8595c] to [5b2eaab011].
| ︙ | ︙ | |||
287 288 289 290 291 292 293 294 295 296 297 298 299 300 |
"-source-db"
"-src-target"
"-src-runname"
"-diff-email"
"-sync-to"
"-prefix-target"
"-diff-html"
)
(list "-h" "-help" "--help"
"-manual"
"-version"
"-force"
"-xterm"
| > | 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 |
"-source-db"
"-src-target"
"-src-runname"
"-diff-email"
"-sync-to"
"-prefix-target"
"-pgsync"
"-diff-html"
)
(list "-h" "-help" "--help"
"-manual"
"-version"
"-force"
"-xterm"
|
| ︙ | ︙ |