diff options
| author | John Ankarström <john@ankarstrom.se> | 2022-08-15 22:24:31 +0200 |
|---|---|---|
| committer | John Ankarström <john@ankarstrom.se> | 2022-08-15 22:24:31 +0200 |
| commit | 246fd1369dce903dad48730478bebbe9733ac88e (patch) | |
| tree | 50a6dc779453ef430a13fd13c9ca21a4d2c3f2a1 /pl/episode_data.pl | |
| parent | 8877627ee3fcd5a8f0ce2fcccec7688973e9cb2d (diff) | |
| download | EpisodeBrowser-246fd1369dce903dad48730478bebbe9733ac88e.tar.gz | |
Start moving data into C++.
This is the first step in the process of getting rid of the SWI Prolog
dependency. We'll see how it goes.
Diffstat (limited to 'pl/episode_data.pl')
| -rw-r--r-- | pl/episode_data.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/pl/episode_data.pl b/pl/episode_data.pl index 167594d..5b83546 100644 --- a/pl/episode_data.pl +++ b/pl/episode_data.pl @@ -115,6 +115,10 @@ maybe_assert_episode_datum(Ep, Key, Value) :- episode_number(Ep) --> integer(Ep). episode_number(Ep) --> integer(Ep), "WPS", integer(_). +% Temporary helper. +fetch_episode_data(Ep, Title, W, Date, Source, Hint) :- + fetch_episode_info(Ep, ['Title'-Title, 'Wiki'-W, 'Date'-Date, 'Source'-Source, 'Hint'-Hint]). + fetch_episode_info(Ep, ['Title'-Title, 'Wiki'-W, 'Date'-Date, 'Source'-Source, 'Hint'-Hint]) :- cached_html('https://www.detectiveconanworld.com/wiki/Anime', H), xpath(H, //tr(td(index(3),@style='background:#f2fde9;')), R), |