1 files changed, 0 insertions, 24 deletions
diff --git a/perl/Git.xs b/perl/Git.xs
index 226dd4f681..6ed26a29b8 100644
--- a/perl/Git.xs
+++ b/perl/Git.xs
@@ -111,30 +111,6 @@ CODE:
 	free((char **) argv);
 }
 
-
-SV *
-xs_get_object(type, id)
-	char *type;
-	char *id;
-CODE:
-{
-	unsigned char sha1[20];
-	unsigned long size;
-	void *buf;
-
-	if (strlen(id) != 40 || get_sha1_hex(id, sha1) < 0)
-		XSRETURN_UNDEF;
-
-	buf = read_sha1_file(sha1, type, &size);
-	if (!buf)
-		XSRETURN_UNDEF;
-	RETVAL = newSVpvn(buf, size);
-	free(buf);
-}
-OUTPUT:
-	RETVAL
-
-
 char *
 xs_hash_object_pipe(type, fd)
 	char *type;