Index: trunk/Cosy/catalog/SlaPlanets.cc
===================================================================
--- trunk/Cosy/catalog/SlaPlanets.cc	(revision 10008)
+++ trunk/Cosy/catalog/SlaPlanets.cc	(revision 10021)
@@ -33,5 +33,5 @@
 // coordinates of planet: topocentric, equatorial, J2000
 //
-RaDec SlaPlanets::CalcPlanetRaDec(ePlanets_t planet)
+RaDec SlaPlanets::CalcPlanetRaDec(ePlanets_t planet) const
 {
     // coordinates of planet: topocentric, equatorial, J2000
@@ -42,5 +42,14 @@
     slaRdplan(GetTT(), planet, GetElong(), GetPhi(), &ra, &dec, &diam);
 
-    return RaDec(ra, dec);
+    //
+    // ---- apparent to mean ----
+    //
+    // This is a stupid workaround because SlaStars assumes
+    // RA/DEC to be mean values rather than apparent
+    //
+    double rm=0, dm=0;
+    slaAmpqk (ra, dec, (double*)fAmprms, &rm, &dm);
+
+    return RaDec(rm, dm);
 }
 
Index: trunk/Cosy/catalog/SlaPlanets.h
===================================================================
--- trunk/Cosy/catalog/SlaPlanets.h	(revision 10008)
+++ trunk/Cosy/catalog/SlaPlanets.h	(revision 10021)
@@ -40,5 +40,5 @@
     void SetMjd(double mjd);
 
-    RaDec CalcPlanetRaDec(ePlanets_t planet);
+    RaDec CalcPlanetRaDec(ePlanets_t planet) const;
     void  UpdatePlanetPos(ePlanets_t planet);
     ZdAz  GetPlanetPos(ePlanets_t planet) const { return fZdAz[planet]; }
