rePackage p =
  upd (\s -> s{ packageFlags = IgnorePackage p : packageFlags s })
tru
ignorePackage p =
  upd (\s -> s{ packageFlags = IgnorePackage p : packageFlags s })
ignorePackage p =
  upd (\s -> s{ packageFlags = IgnorePackage p : packageFlags s })