summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2016-01-18 18:17:30 (GMT)
committerfvogel <fvogelnew1@free.fr>2016-01-18 18:17:30 (GMT)
commit60426c4ec3415ab57206d57f49f672f407b94a86 (patch)
treebcfeeabff0862893ce9f8f8c58d932cde7aad2e5 /generic
parent94fd95f35c60eceaa87f6e666785e6a6d3fb5630 (diff)
downloadtk-60426c4ec3415ab57206d57f49f672f407b94a86.zip
tk-60426c4ec3415ab57206d57f49f672f407b94a86.tar.gz
tk-60426c4ec3415ab57206d57f49f672f407b94a86.tar.bz2
Removed attempt of adjustment of the startup xview according to the -justify option. Anyway this does not work.
Diffstat (limited to 'generic')
-rw-r--r--generic/tkListbox.c11
1 files changed, 0 insertions, 11 deletions
diff --git a/generic/tkListbox.c b/generic/tkListbox.c
index 795ec0f..04dab6f 100644
--- a/generic/tkListbox.c
+++ b/generic/tkListbox.c
@@ -578,17 +578,6 @@ Tk_ListboxObjCmd(
return TCL_ERROR;
}
- /*
- * Adjust startup x view according to the justify option.
- */
-
- if (listPtr->justify == TK_JUSTIFY_RIGHT) {
- listPtr->xOffset = GetMaxOffset(listPtr);
- } else if (listPtr->justify == TK_JUSTIFY_CENTER) {
- listPtr->xOffset = GetMaxOffset(listPtr) / 2;
- listPtr->xOffset -= listPtr->xOffset % listPtr->xScrollUnit;
- }
-
Tcl_SetObjResult(interp, TkNewWindowObj(listPtr->tkwin));
return TCL_OK;
}