let
set_active_action_message msg =
Cam_commands
.launch_command
"set_active_action_message"
[|msg|]