anchor.diff:      $machine->succeed("su alice -c 'test \! -f ~alice/b'");
   
       # Log alice once more
  +    $machine->waitUntilTTYMatches(1, "login: ");
       $machine->sendChars("alice\n");
  -    $machine->sleep(1);
  +    $machine->waitUntilTTYMatches(1, "Password: ");
       $machine->sendChars("foobar\n");
  -    $machine->sleep(2);
  +    $machine->waitUntilTTYMatches(1, "alice\@machine");
   
       # Check that the files are there
       $machine->sleep(1);
  
positive.code:     $machine->log("keyctl unlink said: " . $out);
  
      # Log alice again
      $machine->sendChars("alice\n");
      $machine->sleep(1);
      $machine->sendChars("foobar\n");
      $machine->sleep(2);
  
      # Create some files in encrypted home
      $machine->succeed("su alice -c 'touch ~alice/a'");
  
negative.code:     $machine->log("ecryptfs-migrate-home said: $out");
  
      # Log alice in (ecryptfs passwhrase is wrapped during first login)
      $machine->waitUntilTTYMatches(1, "login: ");
      $machine->sendChars("alice\n");
      $machine->waitUntilTTYMatches(1, "Password: ");
      $machine->sendChars("foobar\n");
      $machine->waitUntilTTYMatches(1, "alice\@machine");
      $machine->sendChars("logout\n");
      $machine->waitUntilTTYMatches(1, "login: ");
  
      # Why do I need to do this??
      $machine->succeed("su alice -c ecryptfs-umount-private || true");
  