From: Bennet Bleßmann <bb-github@t-online.de>
Date: Fri, 4 Oct 2024 17:25:34 +0000 (+0200)
Subject: fix issue #2588
X-Git-Tag: v0.10.0~109^2~1
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=e9f03c89a68c32197c4f712f721b66feef474ee6;p=scryer-prolog.git

fix issue #2588
---

diff --git a/src/machine/system_calls.rs b/src/machine/system_calls.rs
index a092633e..6dad3152 100644
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -7758,7 +7758,7 @@ impl Machine {
             .value_to_str_like(self.machine_st.registers[1])
         {
             let document = scraper::Html::parse_document(&string.as_str());
-            let result = self.html_node_to_term(document.tree.root());
+            let result = self.html_node_to_term(document.tree.root().first_child().unwrap());
 
             unify!(self.machine_st, self.machine_st.registers[2], result);
         } else {