Fix stder -> stderr

This commit is contained in:
Paul Mackerras 2005-05-15 21:49:26 +00:00
parent 276819b35b
commit e47120cb93

6
gitk
View File

@ -7,7 +7,7 @@ exec wish "$0" -- "${1+$@}"
# and distributed under the terms of the GNU General Public Licence,
# either version 2, or (at your option) any later version.
# CVS $Revision: 1.10 $
# CVS $Revision: 1.11 $
proc getcommits {rargs} {
global commits commfd phase canv mainfont
@ -17,7 +17,7 @@ proc getcommits {rargs} {
set commits {}
set phase getcommits
if [catch {set commfd [open "|git-rev-tree $rargs" r]} err] {
puts stder "Error executing git-rev-tree: $err"
puts stderr "Error executing git-rev-tree: $err"
exit 1
}
fconfigure $commfd -blocking 0
@ -261,7 +261,7 @@ Copyright
Use and redistribute under the terms of the GNU General Public License
(CVS $Revision: 1.10 $)} \
(CVS $Revision: 1.11 $)} \
-justify center -aspect 400
pack $w.m -side top -fill x -padx 20 -pady 20
button $w.ok -text Close -command "destroy $w"