Index: write.c
===================================================================
--- write.c	(revision 16364)
+++ write.c	(revision 16365)
@@ -662,7 +662,7 @@
 	io_kicad_legacy_write_subc_index(FP, buff->Data);
 	fputs("$EndINDEX\n", FP);
 
-	pcb_write_element_data(FP, buff->Data, "kicadl");
+	pcb_write_footprint_data(FP, buff->Data, "kicadl");
 
 	return 0;
 }