diff options
Diffstat (limited to 'lib/blame.tcl')
| -rw-r--r-- | lib/blame.tcl | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/lib/blame.tcl b/lib/blame.tcl index 2d0c3f2..a6f0b4a 100644 --- a/lib/blame.tcl +++ b/lib/blame.tcl @@ -203,10 +203,15 @@ method _read_file {fd} { regsub "\r\$" $line {} line incr total_lines - $w_load insert end "\n" - $w_cgrp insert end "\n" - $w_line insert end "$total_lines\n" linenumber - $w_file insert end "$line\n" + if {$total_lines > 1} { + $w_load insert end "\n" + $w_cgrp insert end "\n" + $w_line insert end "\n" + $w_file insert end "\n" + } + + $w_line insert end "$total_lines" linenumber + $w_file insert end "$line" } $w_load conf -state disabled $w_cgrp conf -state disabled |