X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=febootstrap_debian.ml;h=f0d0be58debc4cdfd6dcb6655cd3ec96b88f19e0;hb=474de2b96272435bb94945fd53462481d366dd46;hp=c0cfbacd0e3c8b426ec92a06ba0c52fd0a8c4e67;hpb=66a9d53e48f14d7fe1d9f4b801a1c5582d83efa6;p=febootstrap.git diff --git a/febootstrap_debian.ml b/febootstrap_debian.ml index c0cfbac..f0d0be5 100644 --- a/febootstrap_debian.ml +++ b/febootstrap_debian.ml @@ -107,12 +107,12 @@ let debian_list_files pkg = (* No per-file metadata like in RPM, but we can synthesize it * from the path. *) - let config = statbuf.st_kind = S_REG && string_prefix path "/etc/" in + let config = statbuf.st_kind = S_REG && string_prefix "/etc/" path in let mode = statbuf.st_perm in (path, { ft_dir = is_dir; ft_config = config; ft_mode = mode; - ft_ghost = false }) + ft_ghost = false; ft_size = statbuf.st_size }) ) lines in files