fix hostname vs server id delineation

agent/src/Daemon/SslRenew.hs

@@ -25,7 +25,7 @@ import           Constants
 renewSslLeafCert :: AgentCtx -> IO ()
 renewSslLeafCert ctx = do
     let base = appFilesystemBase . appSettings $ ctx
-    hn  <- injectFilesystemBase base getStart9AgentHostname
+    hn  <- (<> ".local") <$> injectFilesystemBase base getStart9AgentHostname
     tor <- injectFilesystemBase base getAgentHiddenServiceUrl
     putStr @Text "SSL Renewal Required? "
     needsRenew <- doesSslNeedRenew (toS $ entityCertPath hn `relativeTo` base)

agent/src/Lib/Synchronizers.hs

@@ -467,7 +467,7 @@ syncConvertEcdsaCerts = SyncOp "Convert Intermediate Cert to ECDSA P256" check m
 
 replaceDerivativeCerts :: (HasFilesystemBase sig m, Fused.Has (Error S9Error) sig m, MonadIO m) => m ()
 replaceDerivativeCerts = do
-    hn             <- getStart9AgentHostname
+    hn             <- (<> ".local") <$> getStart9AgentHostname
     tor            <- getAgentHiddenServiceUrl
 
     caKeyPath      <- toS <$> getAbsoluteLocationFor rootCaKeyPath