img = ;

river=Image[SelectComponents[MorphologicalComponents[ColorNegate[img],0.82],"Length",-1]];
ImageApply[# {.5,1,.5}&,img,Masking->Dilation[river,5]]