Show More
@@ -3913,7 +3913,7 proc writecommit {} { | |||
|
3913 | 3913 | grid $top.clab $top.cmd -sticky w -pady 10 |
|
3914 | 3914 | ttk::label $top.flab -text "Output file:" |
|
3915 | 3915 | ttk::entry $top.fname -width 60 |
|
3916 | $top.fname insert 0 [file normalize "commit-[string range $rowmenuid 0 6]"] | |
|
3916 | $top.fname insert 0 [file normalize "commit-[string range $rowmenuid 0 6].diff"] | |
|
3917 | 3917 | grid $top.flab $top.fname -sticky w |
|
3918 | 3918 | ttk::frame $top.buts |
|
3919 | 3919 | ttk::button $top.buts.gen -text "Write" -command wrcomgo |
General Comments 0
You need to be logged in to leave comments.
Login now