aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2022-05-28 13:38:18 +0200
committerJohn Ankarström <john@ankarstrom.se>2022-05-28 13:38:18 +0200
commit2608667f440c1d0f15f26c5856f86cb16bb02175 (patch)
treedb28545ac4dc9669edef1a4b335f437b124cde64
parent11a330a7fc93506a44e0b14dd1ad10f7fa4a2104 (diff)
downloadEpisodeBrowser-2608667f440c1d0f15f26c5856f86cb16bb02175.tar.gz
Only collect screenplays.
-rw-r--r--pl/episode_data.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/pl/episode_data.pl b/pl/episode_data.pl
index 3e0ee1b..bde723f 100644
--- a/pl/episode_data.pl
+++ b/pl/episode_data.pl
@@ -132,8 +132,10 @@ fetch_screenwriter_url(Name, U) :-
xpath(A, /self(@href), U).
absolute_url(R) --> "https://www.detectiveconanworld.com", R.
-screenwriter_episode(Ep) --> string(_), "(Episode ", integer(Ep), ")", string(_).
-screenwriter_episode(Ep) --> string(_), "(Episodes ", integer(Ep1), "-", integer(Ep2), ")", string(_),
+screenwriter_episode(Ep) --> string(_), "(Episode ", integer(Ep), ")".
+screenwriter_episode(Ep) --> string(_), "(Episodes ", integer(Ep1), "-", integer(Ep2), ")",
+ { between(Ep1, Ep2, Ep) }.
+screenwriter_episode(Ep) --> string(_), "(Episodes ", integer(Ep1), "-", integer(Ep2), " only)",
{ between(Ep1, Ep2, Ep) }.
fetch_screenwriter_episode(Name, Ep) :-