Changeset 5140c94 in tol for tolbase/lib/toltk
- Timestamp:
- Jun 11, 2012, 11:07:54 AM (14 years ago)
- Branches:
- 1941-docker-image-to-test, devel, master
- Children:
- 0dbdad1
- Parents:
- 78e136b
- File:
-
- 1 edited
-
tolbase/lib/toltk/tolinspe.tcl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
tolbase/lib/toltk/tolinspe.tcl
r78e136b r5140c94 2418 2418 $data_menu(Matrix,Export) add command -label "BDT" \ 2419 2419 -command [list ::TolInspector::ExportBDTMatrix $object] 2420 $data_menu(main) add command -label [mc "Draw matrix"] \2420 $data_menu(main) add command -label [mc "Draw matrix"]... \ 2421 2421 -command [list ::TolInspector::DrawMatrix $object] 2422 2422 } else { … … 2425 2425 $data_menu(Matrix,Export) add cascade -label "BDT" \ 2426 2426 -menu $data_menu(Matrix,Export,BDT) 2427 $data_menu(main) add cascade -label [mc "Draw matrix"] \2427 $data_menu(main) add cascade -label [mc "Draw matrix"]... \ 2428 2428 -menu $data_menu(Matrix,Draw) 2429 2429 foreach objInfo $options_selected(Matrix) { … … 2435 2435 -command [list ::TolInspector::DrawMatrix [lindex $objInfo 0]] 2436 2436 } 2437 if { $grammar eq "Matrix" } { 2438 set all_matrix {} 2439 foreach m $options_selected(Matrix) { 2440 lappend all_matrix [ lindex $m 0 ] 2441 } 2442 TolGui_InsertEntriesMatrixChart $data_menu(main) $all_matrix 2437 } 2438 if { $grammar eq "Matrix" } { 2439 set all_matrix {} 2440 foreach m $options_selected(Matrix) { 2441 lappend all_matrix [ lindex $m 0 ] 2443 2442 } 2443 TolGui_InsertEntriesMatrixChart $data_menu(main) $all_matrix 2444 2444 } 2445 2445 }
Note: See TracChangeset
for help on using the changeset viewer.
