Index: trunk/src/polygon.c
===================================================================
--- trunk/src/polygon.c	(revision 12404)
+++ trunk/src/polygon.c	(revision 12405)
@@ -800,7 +800,7 @@
 {
 	pcb_polyarea_t *np;
 	if (PCB_FLAG_THERM_TEST(layernum, pin))
-		np = pcb_thermal_area(pcb, pin, layernum);
+		np = pcb_thermal_area_pin(pcb, pin, layernum);
 	else
 		np = pcb_poly_from_pin(pin, PIN_SIZE(pin), pin->Clearance);
 	return np;
@@ -918,7 +918,7 @@
 		return PCB_R_DIR_NOT_FOUND;
 	i = pcb_layer_id(info->data, info->layer);
 	if (PCB_FLAG_THERM_TEST(i, pin)) {
-		np = pcb_thermal_area(pcb_data_get_top(info->data), pin, i);
+		np = pcb_thermal_area_pin(pcb_data_get_top(info->data), pin, i);
 		if (!np)
 			return PCB_R_DIR_FOUND_CONTINUE;
 	}
Index: trunk/src/thermal.c
===================================================================
--- trunk/src/thermal.c	(revision 12404)
+++ trunk/src/thermal.c	(revision 12405)
@@ -25,12 +25,17 @@
 #include "thermal.h"
 #include "obj_pinvia_therm.h"
 
+pcb_polyarea_t *pcb_thermal_area_pin(pcb_board_t *pcb, pcb_pin_t *pin, pcb_layer_id_t lid)
+{
+	ThermPoly(pcb, pin, lid);
+}
+
 pcb_polyarea_t *pcb_thermal_area(pcb_board_t *pcb, pcb_any_obj_t *obj, pcb_layer_id_t lid)
 {
 	switch(obj->type) {
 		case PCB_OBJ_PIN:
 		case PCB_OBJ_VIA:
-			return ThermPoly(pcb, (pcb_pin_t *)obj, lid);
+			return pcb_thermal_area_pin(pcb, (pcb_pin_t *)obj, lid);
 
 		case PCB_OBJ_LINE:
 		case PCB_OBJ_POLYGON:
Index: trunk/src/thermal.h
===================================================================
--- trunk/src/thermal.h	(revision 12404)
+++ trunk/src/thermal.h	(revision 12405)
@@ -38,5 +38,7 @@
 } pcb_thermal_t;
 
 pcb_polyarea_t *pcb_thermal_area(pcb_board_t *p, pcb_any_obj_t *obj, pcb_layer_id_t lid);
+pcb_polyarea_t *pcb_thermal_area_pin(pcb_board_t *pcb, pcb_pin_t *pin, pcb_layer_id_t lid);
 
+
 #endif