浏览代码

Remove remaining debug trace call

jherve 1 年之前
父节点
当前提交
9cd8423e98
共有 1 个文件被更改,包括 1 次插入2 次删除
  1. 1 2
      src/LinkedIn/Utils.purs

+ 1 - 2
src/LinkedIn/Utils.purs

@@ -7,7 +7,6 @@ import Data.List.NonEmpty (NonEmptyList)
 import Data.List.NonEmpty as NEL
 import Data.Maybe (Maybe(..), fromJust)
 import Data.Traversable (sequence)
-import Debug (trace)
 import Effect (Effect)
 import LinkedIn (DetachedNode, toDetached)
 import LinkedIn.Types (ParseError(..), Parser)
@@ -27,7 +26,7 @@ toParentNode' n =
 
 queryOne :: String -> Node -> Effect (Maybe Node)
 queryOne selector n = do
-  found <- trace selector \_ -> querySelector (QuerySelector selector) $ toParentNode' n
+  found <- querySelector (QuerySelector selector) $ toParentNode' n
   pure case found of
     Nothing -> Nothing
     Just el -> Just $ E.toNode el