##// END OF EJS Templates
hgk: change config file from .gitk to .hgk...
bdowning@lavos.net -
r5506:be20a42f default
parent child Browse files
Show More
@@ -649,7 +649,7 b' proc savestuff {w} {'
649 649 if {$stuffsaved} return
650 650 if {![winfo viewable .]} return
651 651 catch {
652 set f [open "~/.gitk-new" w]
652 set f [open "~/.hgk-new" w]
653 653 puts $f [list set mainfont $mainfont]
654 654 puts $f [list set curidfont $curidfont]
655 655 puts $f [list set textfont $textfont]
@@ -687,7 +687,7 b' proc savestuff {w} {'
687 687 puts $f "#"
688 688 puts $f "set authorcolors {$authorcolors}"
689 689 close $f
690 file rename -force "~/.gitk-new" "~/.gitk"
690 file rename -force "~/.hgk-new" "~/.hgk"
691 691 }
692 692 set stuffsaved 1
693 693 }
@@ -3847,7 +3847,7 b' set authorcolors {'
3847 3847 deeppink mediumorchid blue burlywood4 goldenrod slateblue red2 navy dimgrey
3848 3848 }
3849 3849
3850 catch {source ~/.gitk}
3850 catch {source ~/.hgk}
3851 3851
3852 3852 if {$curidfont == ""} { # initialize late based on current mainfont
3853 3853 set curidfont "$mainfont bold italic underline"
General Comments 0
You need to be logged in to leave comments. Login now