implement a flood_fill that stops at a given color rather than filling

implement a flood_fill that stops at a given color rather than filling
a region of the color at the start poiint.

from perl you can call flood_fill() with a border parameter to specify
a fill to border.

from the API call the i_flood_fill_border() or i_flood_cfill_border()
function.