Revision: 75611
http://sourceforge.net/p/brlcad/code/75611
Author: starseeker
Date: 2020-04-26 17:09:02 +0000 (Sun, 26 Apr 2020)
Log Message:
-----------
Specify canvas size
Modified Paths:
--------------
brlcad/trunk/src/libdm/tcl_img.cpp
Modified: brlcad/trunk/src/libdm/tcl_img.cpp
===================================================================
--- brlcad/trunk/src/libdm/tcl_img.cpp 2020-04-26 17:04:32 UTC (rev 75610)
+++ brlcad/trunk/src/libdm/tcl_img.cpp 2020-04-26 17:09:02 UTC (rev 75611)
@@ -229,7 +229,7 @@
// Define a canvas widget, pack it into the root window, and associate the
image with it
- std::string canvas_cmd = std::string("pack [canvas ") +
std::string(DM_CANVAS) + std::string("]") ;
+ std::string canvas_cmd = std::string("pack [canvas ") +
std::string(DM_CANVAS) + std::string(" -width ") + std::to_string(wsize) +
std::string(" -height ") + std::to_string(wsize) + std::string("]") ;
Tcl_Eval(interp, canvas_cmd.c_str());
std::string canvas_img_cmd = std::string(DM_CANVAS) + std::string(" create
image 0 0 -image ") + std::string(DM_PHOTO) + std::string(" -anchor nw");
Tcl_Eval(interp, canvas_img_cmd.c_str());
This was sent by the SourceForge.net collaborative development platform, the
world's largest Open Source development site.
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits
