sig
  val string_to_key : string -> Gdk.Tags.modifier list * int
  val key_to_string : Gdk.Tags.modifier list * int -> string
  val t : (Gdk.Tags.modifier list * int) Options.option_class
end