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