~ruther/guix-local

88aab8e3499ef6b6cb63e736ce324bb7910f85dd — Ludovic Courtès 11 years ago 441cfb4
profiles: Use a &message error condition instead of 'error'.

* guix/profiles.scm (sexp->manifest): Use 'raise' instead of 'error'.
1 files changed, 2 insertions(+), 1 deletions(-)

M guix/profiles.scm
M guix/profiles.scm => guix/profiles.scm +2 -1
@@ 278,7 278,8 @@ procedure is here for backward-compatibility and will eventually vanish."
                                  search-paths))))
           name version output path deps search-paths)))
    (_
     (error "unsupported manifest format" sexp))))
     (raise (condition
             (&message (message "unsupported manifest format")))))))

(define (read-manifest port)
  "Return the packages listed in MANIFEST."