set sequencer_view_menu_items {
GuidoMenuItem scheduler_item1 {
-label "Window In"
-command server "WINDOW IN SEQUENCER"
-icon "icons/16/window_in.png"
}
GuidoMenuItem scheduler_item2 {
-label "Window Out"
-command server "WINDOW OUT SEQUENCER"
-icon "icons/16/window_out.png"
}
GuidoMenuItem scheduler_item3 {
-label "Pan View"
-command server "PAN VIEW SEQUENCER"
-icon "icons/16/pan_view.tcl"
}
GuidoSeparator sep1 {
}
GuidoMenuItem scheduler_item4 {
-label "Zoom In"
-command server "ZOOM IN SEQUENCER"
-icon "icons/16/zoom_in.png"
}
GuidoMenuItem scheduler_item5 {
-label "Zoom Out"
-command server "ZOOM OUT SEQUENCER"
-icon "icons/16/zoom_out.png"
}
GuidoMenuItem scheduler_item6 {
-label "Zoom All"
-command server "ZOOM ALL SEQUENCER"
-icon "icons/16/zoom_all.png"
}
GuidoMenuItem scheduler_item7 {
-label "Zoom Factor"
-command server "ZOOM FACTOR SEQUENCER"
}
GuidoMenu trackable_menu_items {
-label "Dockable windows"
}
$trackable_menu_items setTrackableMenus
}
GuidoMenu sequencer_view_menu {
-label "View"
-delayed_script $sequencer_view_menu_items
}
