aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJohn Ankarström <john@ankarstrom.se>2022-04-23 22:57:16 +0200
committerJohn Ankarström <john@ankarstrom.se>2022-04-23 22:57:16 +0200
commit640db5500d4a33bf14d87d7782570d4f7e5f97cf (patch)
tree074ccf58e603a5f1e3bde06e3424fc6b8e31ff90
parenta3679c7efce6d20fd035b14ef201b3e89a974946 (diff)
downloadEpisodeBrowser-640db5500d4a33bf14d87d7782570d4f7e5f97cf.tar.gz
Update data if changed.
-rw-r--r--pl/episode_data.pl3
1 files changed, 2 insertions, 1 deletions
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) :-