package: Fix default profile ownership check when it's just been created.

* guix/scripts/package.scm (guix-package)[ensure-default-profile]: Check
  whether S is true before checking its owner.  Fixes the case where we
  built %PROFILE-DIRECTORY just above.
This commit is contained in:
Ludovic Courtès 2013-05-24 23:14:19 +02:00
parent 929c0f69de
commit cba363bea8

View file

@ -644,7 +644,7 @@ (define (rtfm)
(rtfm))))
;; Bail out if it's not owned by the user.
(unless (= (stat:uid s) (getuid))
(unless (or (not s) (= (stat:uid s) (getuid)))
(format (current-error-port)
(_ "error: directory `~a' is not owned by you~%")
%profile-directory)