Increase height of options dialogue in TCL gui

We have emane models with  a large list of options. Without this modification, a user cannot access all of the options provided by the emane model (some of the options are cutoff and cannot be scrolled-down to).
This commit is contained in:
Shawn Kelly O'Shea 2020-07-16 15:22:33 -04:00 committed by GitHub
parent e0842197e3
commit 35b4c157a0
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -672,11 +672,11 @@ proc popupCapabilityConfig { channel wlan model types values captions bmp possib
pack $windowScroll -fill y -side right
pack $windowCanvas -expand yes -fill both -side top
frame $windowCanvas.notebookFrame -width 700 -height 1200
frame $windowCanvas.notebookFrame -width 700 -height 2400
set notebookFrame $windowCanvas.notebookFrame
pack $notebookFrame -fill both -expand yes -padx 5 -pady 5
ttk::notebook $notebookFrame.vals -width 690 -height 1200
ttk::notebook $notebookFrame.vals -width 690 -height 2400
set configNotebook $notebookFrame.vals
ttk::notebook::enableTraversal $configNotebook
pack $configNotebook -fill both -expand yes