From 43147db0b3c5232068f0cec70008fa217fa97476 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Thu, 24 Oct 2019 15:29:27 +0200
Subject: polarisation_correction: Scale the sigma as well

---
 libcrystfel/src/geometry.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/libcrystfel/src/geometry.c b/libcrystfel/src/geometry.c
index fc42a8de..3d6cd699 100644
--- a/libcrystfel/src/geometry.c
+++ b/libcrystfel/src/geometry.c
@@ -1042,7 +1042,7 @@ void polarisation_correction(RefList *list, UnitCell *cell,
 	      refl = next_refl(refl, iter) )
 	{
 		double pol;
-		double intensity;
+		double intensity, sigma;
 		double xl, yl, zl;
 		double phi, tt, kpred;
 		signed int h, k, l;
@@ -1062,7 +1062,9 @@ void polarisation_correction(RefList *list, UnitCell *cell,
 		     +  (1.0-P)*(1.0 - sin(phi)*sin(phi)*sin(tt)*sin(tt));
 
 		intensity = get_intensity(refl);
+		sigma = get_esd_intensity(refl);
 		set_intensity(refl, intensity / pol);
+		set_esd_intensity(refl, sigma / pol);
 	}
 }
 
-- 
cgit v1.2.3