diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2008-10-03 15:37:02 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2008-10-03 15:37:02 (GMT) |
| commit | 291d618cfb6ad5e935244599abbf1bdb93a284fc (patch) | |
| tree | f88fe7b03518fab1916b3d6afcd6c2f4e4f6397a /generic/tkListbox.c | |
| parent | 8b4ecc93591895810fb1546a33a8dbd0ac0ab131 (diff) | |
| download | tk-291d618cfb6ad5e935244599abbf1bdb93a284fc.zip tk-291d618cfb6ad5e935244599abbf1bdb93a284fc.tar.gz tk-291d618cfb6ad5e935244599abbf1bdb93a284fc.tar.bz2 | |
typo
Diffstat (limited to 'generic/tkListbox.c')
| -rw-r--r-- | generic/tkListbox.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tkListbox.c b/generic/tkListbox.c index 6a61416..0c91a3a 100644 --- a/generic/tkListbox.c +++ b/generic/tkListbox.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkListbox.c,v 1.46 2008/10/03 13:13:31 dkf Exp $ + * RCS: @(#) $Id: tkListbox.c,v 1.47 2008/10/03 15:37:02 dkf Exp $ */ #include "default.h" @@ -1258,7 +1258,7 @@ ListboxXviewSubCmd( } Tcl_PrintDouble(NULL, fraction, buf); Tcl_SetResult(interp, buf, TCL_VOLATILE); - Tcl_PrintDouble(NULL, fraction1, buf); + Tcl_PrintDouble(NULL, fraction2, buf); Tcl_AppendResult(interp, " ", buf, NULL); } } else if (objc == 3) { |