Show More
@@ -3913,7 +3913,7 b' proc writecommit {} {' | |||||
3913 | grid $top.clab $top.cmd -sticky w -pady 10 |
|
3913 | grid $top.clab $top.cmd -sticky w -pady 10 | |
3914 | ttk::label $top.flab -text "Output file:" |
|
3914 | ttk::label $top.flab -text "Output file:" | |
3915 | ttk::entry $top.fname -width 60 |
|
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 | grid $top.flab $top.fname -sticky w |
|
3917 | grid $top.flab $top.fname -sticky w | |
3918 | ttk::frame $top.buts |
|
3918 | ttk::frame $top.buts | |
3919 | ttk::button $top.buts.gen -text "Write" -command wrcomgo |
|
3919 | ttk::button $top.buts.gen -text "Write" -command wrcomgo |
General Comments 0
You need to be logged in to leave comments.
Login now