diff --git a/mycp/mycp b/mycp/mycp
index 2069efa..d339b11 100755
--- a/mycp/mycp
+++ b/mycp/mycp
@@ -190,8 +190,11 @@ sub inperms($) {
 
 EOT
 		close FH;
-		&cvsadd($permsfile);
-		&checkin($permsfile);
+		my $cwd = cwd;
+		chdir dirname($permsfile);
+		system("$cvscmd add " . &basename($permsfile));
+		system("cvscmd ci -m initial " . &basename($permsfile));
+		chdir $cwd;
 	}
 
 	my $perms = &slurp($permsfile);