let is_active l = 
  if !levels == Levels.empty then false else 
    (Levels.mem l !levels ||
     Levels.mem "all" !levels)