From 640db5500d4a33bf14d87d7782570d4f7e5f97cf Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= Date: Sat, 23 Apr 2022 22:57:16 +0200 Subject: Update data if changed. --- pl/episode_data.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/pl/episode_data.pl b/pl/episode_data.pl index 63a54ed..0246de0 100644 --- a/pl/episode_data.pl +++ b/pl/episode_data.pl @@ -87,7 +87,8 @@ maybe_assert_episode_title(Ep, Title) :- maybe_assert_episode_datum(Ep, Key, Value) :- ( episode_datum(Ep, Key, Value), ! - ; assert_episode_datum(Ep, Key, Value) + ; retract_episode_datum(Ep, Key, _), + assert_episode_datum(Ep, Key, Value) ). fetch_html(H) :- -- cgit v1.2.3