Finally parse

amitaibu · Jul 24, 2024 · 36ea162 · 36ea162
1 parent b9f6b12
commit 36ea162
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Application/Helper/Elasticsearch.hs b/Application/Helper/Elasticsearch.hs
@@ -64,7 +64,7 @@ searchNews queryText = do
 
             let newsIds :: [Id News] = map (textToId . unDocId . hitDocId) $ hits $ searchHits searchResult
             liftIO $ putStrLn $ "newsIds: " ++ show newsIds
-            return []
+            return newsIds
 
     -- Parse result and extract the News ids. The News IDs is the Doc
     pure []