Package p =
  upd (\s -> s{ packageFlags = HidePackage p : packageFlags s })
ign
hidePackage p =
  upd (\s -> s{ packageFlags = HidePackage p : packageFlags s })
hidePackage p =
  upd (\s -> s{ packageFlags = HidePackage p : packageFlags s })