From 40a422fabd3fe14a83b6a0213fef821614f4c568 Mon Sep 17 00:00:00 2001 From: Nick White Date: Thu, 21 May 2015 14:21:48 +0100 Subject: Don't bail if an image can't be read --- tkread | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/tkread b/tkread index 9b8cc6c..0991dcc 100755 --- a/tkread +++ b/tkread @@ -167,8 +167,7 @@ proc markup {widget} { $widget delete [indexmovechar $altstart "- 2"] [indexmovechar $srcend "+ 1"] set insertion [indexmovechar $altstart "- 2"] set localfile [file tail $src] - if [file exists $localfile] { - set curimg [image create photo -file $localfile] + if { [file exists $localfile] && ! [catch { set curimg [image create photo -file $localfile] }] } { set imgcache($curimg) [image create photo] $imgcache($curimg) copy $curimg set imgshrunk($curimg) 0 -- cgit v1.2.3