mirror of
https://github.com/genodelabs/genode.git
synced 2025-02-20 09:46:20 +00:00
parent
c5f1ac615c
commit
874815ebf6
@ -67,7 +67,7 @@ proc _collect_pkg_archive_from_depot { user name version } {
|
||||
set archives_file "[depot_dir]/$archive_dir/archives"
|
||||
|
||||
if {![file exists $archives_file]} {
|
||||
puts "Error: missing file $archives_file"
|
||||
puts stderr "Error: missing file $archives_file"
|
||||
exit 1
|
||||
}
|
||||
|
||||
@ -127,20 +127,23 @@ proc _collect_src_archive_from_depot { user name version } {
|
||||
# Determine the current version for the given archive
|
||||
#
|
||||
# This function tries to determine the version information from the Genode
|
||||
# source tree. It returns an empty string if the archive is missing from the
|
||||
# source tree. It exits with an error if the archive is missing from the
|
||||
# depot.
|
||||
#
|
||||
proc _current_depot_archive_version { type name } {
|
||||
|
||||
set hash_rel_path "recipes/$type/$name/hash"
|
||||
set repo [repository_contains $hash_rel_path]
|
||||
set version ""
|
||||
|
||||
if {$repo != ""} {
|
||||
set fh [open "$repo/$hash_rel_path" "RDONLY"]
|
||||
set version [lindex [gets $fh] 0]
|
||||
close $fh
|
||||
if {$repo == ""} {
|
||||
puts stderr "Error: unable to guess version of '$name' archive"
|
||||
exit 1
|
||||
}
|
||||
|
||||
set fh [open "$repo/$hash_rel_path" "RDONLY"]
|
||||
set version [lindex [gets $fh] 0]
|
||||
close $fh
|
||||
|
||||
return $version
|
||||
}
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user