let
itemCommit_files =
GMenu
.menu_item
~label:
Ocvs_messages
.m_commit_files
~packing: menuCvs
#
add
()