git-pack-objects: mark the delta packing with a 'D'.
[gitweb.git] / pack-objects.c
index 9a468bd9fc5e381c559c5ec5ffa2730519eb2014..8de7bd03444720b40fcad7c7102c989142b00c9c 100644 (file)
@@ -114,6 +114,7 @@ static unsigned long write_object(FILE *f, struct object_entry *entry)
        memcpy(header+1, &datalen, 4);
        hdrlen = 5;
        if (entry->delta) {
+               header[0] = 'D';
                memcpy(header+1, entry->delta, 20);
                buf = delta_against(buf, size, entry);
                size = entry->delta_size;