Index: trunk/src/obj_pstk.h
===================================================================
--- trunk/src/obj_pstk.h	(revision 12926)
+++ trunk/src/obj_pstk.h	(revision 12927)
@@ -131,8 +131,9 @@
 /* Find or create a new transformed version of an existing proto */
 pcb_pstk_tshape_t *pcb_pstk_make_tshape(pcb_data_t *data, pcb_pstk_proto_t *proto, double rot, int xmirror, int *out_protoi);
 
-/* Deep copy a prototype */
+/* Deep copy a prototype or shape */
 void pcb_pstk_proto_copy(pcb_pstk_proto_t *dst, const pcb_pstk_proto_t *src);
+void pcb_pstk_shape_copy(pcb_pstk_shape_t *dst, pcb_pstk_shape_t *src);
 
 /* grow (or shrink) a prototype to or by val - change the proto in place */
 void pcb_pstk_proto_grow(pcb_pstk_proto_t *proto, pcb_bool is_absolute, pcb_coord_t val);
Index: trunk/src/obj_pstk_proto.c
===================================================================
--- trunk/src/obj_pstk_proto.c	(revision 12926)
+++ trunk/src/obj_pstk_proto.c	(revision 12927)
@@ -275,6 +275,21 @@
 	return ret;
 }
 
+void pcb_pstk_shape_copy(pcb_pstk_shape_t *dst, pcb_pstk_shape_t *src)
+{
+	memcpy(dst, src, sizeof(pcb_pstk_shape_t));
+	switch(src->shape) {
+		case PCB_PSSH_LINE:
+		case PCB_PSSH_CIRC:
+			break; /* do nothing, all fields are copied already by the memcpy */
+		case PCB_PSSH_POLY:
+			pcb_pstk_shape_alloc_poly(&dst->data.poly, src->data.poly.len);
+			pcb_pstk_shape_copy_poly(&dst->data.poly, &src->data.poly);
+			break;
+	}
+}
+
+
 void pcb_pstk_tshape_copy(pcb_pstk_tshape_t *ts_dst, pcb_pstk_tshape_t *ts_src)
 {
 	int n;