gitk: Prevent the text pane from becoming editable

diff --git a/gitk b/gitk
index c5aa844ef448ef7e68314c71fc39e7630b843e36..8f65900763b4878da98f6e6d37d87efa047c36b4 100755 (executable)
--- a/gitk
+++ b/gitk
@@ -7327,6 +7327,7 @@ proc getblobline {bf id} {
                            [lindex [split $commentend .] 0]}]
            mark_ctext_line $lnum
        }
+       $ctext config -state disabled
        return 0
     }
     $ctext config -state disabled