set editmenu_items {
GuidoMenuItem undo {
-label "Undo"
-icon "icons/16/undo.png"
-command server "UNDO"
}
GuidoMenuItem redo {
-label "Redo"
-icon "icons/16/redo.png"
-command server "REDO"
}
GuidoScript scripts/menus/undo.tcl
GuidoSeparator sep1 {
}
GuidoScript scripts/menus/editlayer.tcl
GuidoScript scripts/menus/q_editstring.tcl
GuidoScript scripts/menus/q_editsegment.tcl
GuidoScript scripts/menus/editpoint.tcl
}
GuidoMenu editmenu {
-label "Edit"
-delayed_script $editmenu_items
}
