about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--users/Profpatsch/whatcd-resolver/src/Redacted.hs2
-rw-r--r--users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs2
2 files changed, 2 insertions, 2 deletions
diff --git a/users/Profpatsch/whatcd-resolver/src/Redacted.hs b/users/Profpatsch/whatcd-resolver/src/Redacted.hs
index b2cef8bc2132..c8182a8cabdf 100644
--- a/users/Profpatsch/whatcd-resolver/src/Redacted.hs
+++ b/users/Profpatsch/whatcd-resolver/src/Redacted.hs
@@ -68,7 +68,7 @@ redactedGetTorrentFile dat = inSpan' "Redacted Get Torrent File" $ \span -> do
       )
   httpTorrent span req
 
-mkRedactedTorrentLink :: Arg "torrentId" Int -> Text
+mkRedactedTorrentLink :: Arg "torrentGroupId" Int -> Text
 mkRedactedTorrentLink torrentId = [fmt|https://redacted.ch/torrents.php?id={torrentId.unArg}|]
 
 exampleSearch :: (MonadThrow m, MonadLogger m, MonadPostgres m, MonadOtel m) => m (Transaction m ())
diff --git a/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs b/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs
index 83956902b7a3..65d84b684c72 100644
--- a/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs
+++ b/users/Profpatsch/whatcd-resolver/src/WhatcdResolver.hs
@@ -541,7 +541,7 @@ getBestTorrentsTable artistFilter = do
                     {artists}
                   </td>
                   <td>
-                    <a href={mkRedactedTorrentLink (Arg b.torrentId)}>
+                    <a href={mkRedactedTorrentLink (Arg b.groupId)} target="_blank">
                       {Html.toHtml @Text b.torrentGroupJson.groupName}
                     </a>
                   </td>