From e8082043e8ca4e6d659565c6dd0798ac0870499e Mon Sep 17 00:00:00 2001
From: BenjiReis <benjamin.reis@vates.fr>
Date: Mon, 25 Mar 2024 11:22:37 +0100
Subject: [PATCH] Update ocaml/xapi/xapi_pci_helpers.ml

Co-authored-by: Pau Ruiz Safont <psafont@users.noreply.github.com>
Signed-off-by: BenjiReis <benjamin.reis@vates.tech>
---
 ocaml/xapi/xapi_pci_helpers.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ocaml/xapi/xapi_pci_helpers.ml b/ocaml/xapi/xapi_pci_helpers.ml
index c776cd11209..d42e2b14d89 100644
--- a/ocaml/xapi/xapi_pci_helpers.ml
+++ b/ocaml/xapi/xapi_pci_helpers.ml
@@ -185,7 +185,7 @@ let update_dom0_access ~__context ~pci ~action =
           `disabled
       )
   in
-  let expr = Printf.sprintf "field \"PCI\"=\"%s\"" (Ref.string_of pci) in
+  let expr = Printf.sprintf {|field "PCI"="%s"|} (Ref.string_of pci) in
   let pgpus = Db.PGPU.get_all_records_where ~__context ~expr in
   List.iter
     (fun (pgpu_ref, _) ->