Tk Source Code

Check-in [c002a972]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix incorrect syntax in test imgPhoto-4.29 that was accepted before the fix [b26fc11eb0] and made the test fail since it's no longer accepted.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | bug-d4fb4e80d2
Files: files | file ages | folders
SHA1: c002a9728c68f998651ed493563a90342b2c21f5
User & Date: fvogel 2016-12-07 21:13:13
Context
2017-01-07
15:34
Merge core-8-6-branch check-in: d0b778eb user: fvogel tags: bug-d4fb4e80d2
2016-12-07
21:13
Fix incorrect syntax in test imgPhoto-4.29 that was accepted before the fix [b26fc11eb0] and made the test fail since it's no longer accepted. check-in: c002a972 user: fvogel tags: bug-d4fb4e80d2
20:55
Fix [d4fb4e80d2] - Image photo commands read/write/put do not accept a dash as first letter in file names resp. image data (contributed patch) check-in: b26fc11e user: fvogel tags: bug-d4fb4e80d2
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tests/imgPhoto.test.

418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
    photo1 put {{blahgle}}
} -cleanup {
    image delete photo1
} -returnCodes error -result {can't parse color "blahgle"}
test imgPhoto-4.29 {ImgPhotoCmd procedure: put option} -setup {
    image create photo photo1
} -body {
    photo1 put -to 10 10 20 20 {{white}}
    photo1 get 19 19
} -cleanup {
    image delete photo1
} -result {255 255 255}
test imgPhoto-4.30 {ImgPhotoCmd procedure: read option} -setup {
    image create photo photo1
} -body {







|







418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
    photo1 put {{blahgle}}
} -cleanup {
    image delete photo1
} -returnCodes error -result {can't parse color "blahgle"}
test imgPhoto-4.29 {ImgPhotoCmd procedure: put option} -setup {
    image create photo photo1
} -body {
    photo1 put {{white}} -to 10 10 20 20
    photo1 get 19 19
} -cleanup {
    image delete photo1
} -result {255 255 255}
test imgPhoto-4.30 {ImgPhotoCmd procedure: read option} -setup {
    image create photo photo1
} -body {