guix: nar: Update path-id to valid-path-id.
To match the change in (guix store database). * guix/nar.scm (finalize-store-file): Update path-id to valid-path-id. Change-Id: I69255c7acc1ea4e4855a4621bfcec54f595dd24dmaster
parent
c3dfb14f9b
commit
acd3cb258f
|
@ -103,11 +103,11 @@ held."
|
||||||
(acquire-lock file)))))
|
(acquire-lock file)))))
|
||||||
|
|
||||||
(with-database %default-database-file db
|
(with-database %default-database-file db
|
||||||
(unless (path-id db target)
|
(unless (valid-path-id db target)
|
||||||
(let ((lock (and lock?
|
(let ((lock (and lock?
|
||||||
(acquire-lock (string-append target ".lock")))))
|
(acquire-lock (string-append target ".lock")))))
|
||||||
|
|
||||||
(unless (path-id db target)
|
(unless (valid-path-id db target)
|
||||||
;; If FILE already exists, delete it (it's invalid anyway.)
|
;; If FILE already exists, delete it (it's invalid anyway.)
|
||||||
(when (file-exists? target)
|
(when (file-exists? target)
|
||||||
(delete-file-recursively target))
|
(delete-file-recursively target))
|
||||||
|
|
Reference in New Issue