From 60160758a00efab4904c3d0f3aeb5042fe4191cb Mon Sep 17 00:00:00 2001 From: Lucy Cifferello <12953208+elvece@users.noreply.github.com> Date: Mon, 5 Jul 2021 16:00:45 -0400 Subject: [PATCH] fix path and temp icon for service --- src/Handler/Marketplace.hs | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/src/Handler/Marketplace.hs b/src/Handler/Marketplace.hs index fd93cb5..3703154 100644 --- a/src/Handler/Marketplace.hs +++ b/src/Handler/Marketplace.hs @@ -199,7 +199,10 @@ getServiceR = do sendResponseStatus status500 ("Internal Server Error" :: Text) Right (a :: ServiceManifest) -> pure a d <- traverse (mapDependencyMetadata appsDir appMgrDir domain) (HM.toList $ serviceManifestDependencies manifest) - icon <- decodeIcon appMgrDir appsDir appExt + let depPath = appsDir toS appId show version + -- @TODO uncomment when sdk icon working + -- icon <- decodeIcon appMgrDir depPath appExt + let icon = [i|https://#{domain}/icons/#{appId}.png|] addPackageHeader appMgrDir appDir appExt pure $ ServiceRes { serviceResIcon = icon @@ -221,9 +224,10 @@ mapDependencyMetadata appsDir appmgrPath domain (appId, depInfo) = do let depPath = appsDir toS appId show version -- @TODO uncomment when sdk icon working -- icon <- decodeIcon appmgrPath depPath ext + let icon = [i|https://#{domain}/icons/#{appId}.png|] pure (appId, DependencyInfo { dependencyInfoTitle = appId - , dependencyInfoIcon = [i|https://#{domain}/icons/#{appId}.png|] + , dependencyInfoIcon = icon })