gitk: Report errors in saving config file

Signed-off-by: Max Kirillov <max@max630.net> Signed-off-by: Paul Mackerras <paulus@samba.org>

Max Kirillov committed Mar 4, 2015 at 05:58 UTC 1dd29606b69279605f42b715e491aaf8cd0fea60
1 file changed +3 -1
gitk
+3 -1
@@ -2818,7 +2818,7 @@ proc savestuff {w} {
2818
2819 if {$stuffsaved} return
2820 if {![winfo viewable .]} return
2821 - catch {
2821 + if {[catch {
2822 if {[file exists $config_file_tmp]} {
2823 file delete -force $config_file_tmp
2824 }
@@ -2884,6 +2884,8 @@ proc savestuff {w} {
2884 puts $f "}"
2885 close $f
2886 file rename -force $config_file_tmp $config_file
2887 + } err]} {
2888 + puts "Error saving config: $err"
2889 }
2890 set stuffsaved 1
2891 }