 
 (defn- is-episode?
   "Is line a episode"
-  [line] (some-> line
-                 :content
-                 first
-                 :attrs
-                 :align
-                 (= "left")))
+  [line] (let [content (:content line)]
+           (and (some-> content
+                        first
+                        :attrs
+                        :align
+                        (= "left"))
+                (some-> content
+                        vec
+                        (get 10)
+                        :content
+                        first
+                        :tag
+                        (= :a)))))
 
 (defn- get-season-number
   "Get season number from line"

  "Get episode name holder element"
  [line] (-> line
             :content
             (nth 6)
             :content
             first))


          :url (-> line
                   get-episode-name-element
                   :attrs
                   :href
                   make-url)})

(defn- get-seasons
  "Get season with episodes"
