mirrors/git
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gitk - remove trailing whitespace from a few lines.

Browse Source 
Signed-off-by: Mark Levedahl <mdl123@verizon.net>
This commit is contained in:
Mark Levedahl
2007-02-01 08:44:46 -05:00
committed by Junio C Hamano
parent 8188e73b17
commit 32364b3a19
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
gitk
View File

@ -427,7 +427,7 @@ proc makewindow {} {
.bar.view add separator .bar.view add separator
.bar.view add radiobutton -label "All files" -command {showview 0} \ .bar.view add radiobutton -label "All files" -command {showview 0} \
-variable selectedview -value 0 -variable selectedview -value 0
menu .bar.help menu .bar.help
.bar add cascade -label "Help" -menu .bar.help .bar add cascade -label "Help" -menu .bar.help
.bar.help add command -label "About gitk" -command about .bar.help add command -label "About gitk" -command about
@ -1402,7 +1402,7 @@ proc newview {ishighlight} {
set newviewname($nextviewnum) "View $nextviewnum" set newviewname($nextviewnum) "View $nextviewnum"
set newviewperm($nextviewnum) 0 set newviewperm($nextviewnum) 0
set newviewargs($nextviewnum) [shellarglist $revtreeargs] set newviewargs($nextviewnum) [shellarglist $revtreeargs]
vieweditor $top $nextviewnum "Gitk view definition" vieweditor $top $nextviewnum "Gitk view definition"
} }
proc editview {} { proc editview {} {
@ -3897,7 +3897,7 @@ proc selectline {l isnew} {
} }
$ctext insert end "\n" $ctext insert end "\n"
} }
set headers {} set headers {}
set olds [lindex $parentlist $l] set olds [lindex $parentlist $l]
if {[llength $olds] > 1} { if {[llength $olds] > 1} {
@ -4006,7 +4006,7 @@ proc selnextpage {dir} {
set l [expr $numcommits - 1] set l [expr $numcommits - 1]
} }
unmarkmatches unmarkmatches
selectline $l 1 selectline $l 1
} }
proc unselectline {} { proc unselectline {} {