!7

p-magellan-thread {
  File originalHomeDir = newFile(first(args));
  
  // seed VM arguments
  
  if (fileExists(originalHomeDir)) {
    File out = getProgramFile(#1005850, "default-vm-args");
    File in = newFile(javaxDataDirForUserHome(originalHomeDir), #1005850, "default-vm-args");
    if (!out.exists() && in.exists())
      copyFile(in, out);
  }
  
  S user = systemUserName();
  print("User: " + user);
  print("Home: " + userHome());
  if (neq(user, "root")) {
    print("Failure: I'm not root!");
    ret;
  }
  renameVM("Super User VM.");
  consoleTitle("JavaX Super User VM [" + user + "]");
  sleep();
}