mirrors/libguestfs
1
0
Fork 0
mirror of https://github.com/libguestfs/libguestfs.git synced 2026-03-21 22:53:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

daemon/inspect_fs_windows.ml: Use {|..|} string literal

Browse Source
This commit is contained in:
Richard W.M. Jones
2025-09-01 13:59:56 +01:00
parent f857f39a2d
commit 32b911a061
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
daemon/inspect_fs_windows.ml
View File

@@ -337,7 +337,7 @@ and get_drive_mappings h root data =
let key = Hivex.value_key h value in
let keylen = String.length key in
if keylen >= 14 &&
String.lowercase_ascii (String.sub key 0 12) = "\\dosdevices\\" &&
String.lowercase_ascii (String.sub key 0 12) = {|\dosdevices\|} &&
Char.isalpha key.[12] && key.[13] = ':' then (
let drive_letter = String.sub key 12 1 in