Repository.xs: Check type for new working directory in workdir()

jacquesg · Apr 22, 2014 · db9b385 · db9b385
1 parent e397f70
commit db9b385
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/xs/Repository.xs b/xs/Repository.xs
@@ -922,9 +922,14 @@ workdir(self, ...)
 
 	CODE:
 		if (items == 2) {
-			const char *new_path = SvPVbyte_nolen(ST(1));
+			const char *new_dir = NULL;
 
-			rc = git_repository_set_workdir(self, new_path, 1);
+			if (!SvPOK(ST(1)))
+				Perl_croak(aTHX_ "Expected a string for 'new_dir'");
+
+			new_dir = SvPVbyte_nolen(ST(1));
+
+			rc = git_repository_set_workdir(self, new_dir, 1);
 			git_check_error(rc);
 		}