瀏覽代碼

remove some dead code

jherve 1 年之前
父節點
當前提交
b2e3c18894
共有 1 個文件被更改,包括 0 次插入7 次删除
  1. 0 7
      src/LinkedIn/Page/Projects.purs

+ 0 - 7
src/LinkedIn/Page/Projects.purs

@@ -38,13 +38,6 @@ instance Traversable ProjectsPage where
 
   traverse = \x -> traverseDefault x
 
-query :: QueryRunner' Document (ProjectsPage Node)
-query n = do
-  cards <- subQueryMany queryArtDecoCard "section.artdeco-card > div ~ div > div > div > ul > li" n
-  pure $ ProjectsPage cards
-
-extract ∷ ProjectsPage UIElement → Either String (NonEmptyList Project)
-extract (ProjectsPage cards) = traverse PP.fromUI cards
 
 instance Extractible ProjectsPage where
   query n = do