minor fix

Author: aquatiko

src/utils.jl

@@ -19,15 +19,7 @@ function wcs_to_celestial_frame(wcs::WCSTransform)
     ycoord = wcs.ctype[2][1:4]
 
     if radesys == ""
-        if xcoord == "RA--" && ycoord == "DEC-"
-            if equinox === nothing
-                radesys = "ICRS"
-            elseif equinox < 1984.0
-                radesys = "FK4"
-            else
-                radesys = "FK5"
-            end  
-        elseif xcoord == "GLON" && ycoord == "GLAT"
+        if xcoord == "GLON" && ycoord == "GLAT"
             radesys = "Gal"
         elseif xcoord == "TLON" && ycoord == "TLAT"
             radesys = "ITRS"

test/utils.jl

@@ -1,3 +1,4 @@
+using Reproject: wcs_to_celestial_frame
 @testset "wcs to celestial frame" begin
     wcs1 = WCSTransform(2;
                        ctype = ["RA---AIR", "DEC--AIR"],
@@ -20,12 +21,11 @@
                        ctype = ["RA---AIR", "DEC--AIR"],
                        radesys = "UNK" 
                       )
-    
+
     @test wcs_to_celestial_frame(wcs1) == "ICRS"
     @test wcs_to_celestial_frame(wcs2) == "FK4"
     @test wcs_to_celestial_frame(wcs3) == "FK5"
     @test wcs_to_celestial_frame(wcs4) == "Gal"
     @test wcs_to_celestial_frame(wcs5) == "ITRS"
     @test wcs_to_celestial_frame(wcs6) == "UNK"
 end
-