Overview
| SHA1 Hash: | 95fdf5ee69d3fd9fdc40e082ea7ce36cb0af625f |
|---|---|
| Date: | 2012-02-22 17:13:55 |
| User: | mrwellan |
| Comment: | Added tests to rm of test dir in tree for speculative bug fix |
| Timelines: | family | ancestors | descendants | both | trunk |
| Downloads: | Tarball | ZIP archive |
| Other Links: | files | file ages | manifest |
Tags And Properties
- branch=trunk inherited from [d673a9367e]
- sym-trunk inherited from [d673a9367e]
Changes
Modified launch.scm from [3d741a045bcae29c] to [354dcb520bf7bfab].
394 (system (conc "mkdir -p " dfullp)) 394 (system (conc "mkdir -p " dfullp)) 395 (debug:print 2 " - creating link from " dfullp "/" testname " to " lnkpath) 395 (debug:print 2 " - creating link from " dfullp "/" testname " to " lnkpath) 396 (system (conc "mkdir -p " lnkpath)) 396 (system (conc "mkdir -p " lnkpath)) 397 397 398 ;; I suspect this section was deleting test directories under some 398 ;; I suspect this section was deleting test directories under some 399 ;; wierd sitations? This doesn't make sense - reenabling the rm -f 399 ;; wierd sitations? This doesn't make sense - reenabling the rm -f 400 400 401 (if (file-exists? (conc lnkpath "/" testname)) | 401 (let ((testlink (conc lnkpath "/" testname))) > 402 (if (and (file-exists? testlink) > 403 (or (regular-file? testlink) > 404 (symbolic-link? testlink))) 402 (system (conc "rm -f " lnkpath "/" testname))) | 405 (system (conc "rm -f " testlink))) 403 (system (conc "ln -sf " dfullp " " lnkpath "/" testname)) | 406 (system (conc "ln -sf " dfullp " " testlink))) 404 (if (directory? dfullp) 407 (if (directory? dfullp) 405 (begin 408 (begin 406 (let* ((cmd (conc "rsync -av" (if (> *verbosity* 1) "" "q") " " tes 409 (let* ((cmd (conc "rsync -av" (if (> *verbosity* 1) "" "q") " " tes 407 (status (system cmd))) 410 (status (system cmd))) 408 (if (not (eq? status 0)) 411 (if (not (eq? status 0)) 409 (debug:print 2 "ERROR: problem with running \"" cmd "\""))) 412 (debug:print 2 "ERROR: problem with running \"" cmd "\""))) 410 (list dfullp toptest-path)) 413 (list dfullp toptest-path))
Modified tests/tests/ezlog_warn/testconfig from [f14cf9fc78564e45] to [bb1f94c96fdda7b0].
1 [setup] 1 [setup] 2 2 3 [ezsteps] 3 [ezsteps] 4 lookittmp ls /tmp 4 lookittmp ls /tmp 5 lookithome ls /home | 5 lookithome ls $HOME 6 6 7 [test_meta] 7 [test_meta] 8 author matt 8 author matt 9 owner bob 9 owner bob 10 description This test runs two ezsteps the first of which is expected to fail us 10 description This test runs two ezsteps the first of which is expected to fail us 11 11 12 tags first,single 12 tags first,single 13 reviewed 09/10/2011, by Matt 13 reviewed 09/10/2011, by Matt