From c5a09776a7233ff51fb54d96f98f3ebba0dbf58b Mon Sep 17 00:00:00 2001
From: jhmatthews <matthews@ast.cam.ac.uk>
Date: Wed, 30 Aug 2023 13:13:23 +0100
Subject: [PATCH] fix extract for bubble and lamp-post PL sources

---
 source/extract.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/extract.c b/source/extract.c
index 43bd639b2..db6e59076 100644
--- a/source/extract.c
+++ b/source/extract.c
@@ -287,7 +287,7 @@ extract (w, p, itype)
        * thesis
      */
 
-    if (itype == PTYPE_STAR || itype == PTYPE_BL || itype == PTYPE_AGN)
+    if (itype == PTYPE_STAR || itype == PTYPE_BL || (itype == PTYPE_AGN && geo.pl_geometry == PL_GEOMETRY_SPHERE))
     {
       stuff_v (pp.x, x);
       renorm (x, 1.);