nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

guix-download: Print the hash of the file's contents, no that of the path. 

* guix-download.in (guix-download): Display the hash of the contents of
  PATH, not the path hash.  Also, call `add-to-store' with FIXED? = #t.
This commit is contained in:
Ludovic Courtès 2012-11-08 00:25:26 +01:00
parent 37d19403e7
commit a3aa25f83d
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
guix-download.in
View File

@ -173,9 +173,9 @@ Report bugs to: ~a.~%") "@PACKAGE_BUGREPORT@"))
(fetch uri port) (fetch uri port)
(close port) (close port)
(add-to-store store (basename (uri-path uri)) (add-to-store store (basename (uri-path uri))
#f #f "sha256" name)))) #t #f "sha256" name))))
(hash (call-with-input-file path
(compose sha256 get-bytevector-all)))
(fmt (assq-ref opts 'format))) (fmt (assq-ref opts 'format)))
(format #t "~a~%~a~%" (format #t "~a~%~a~%" path (fmt hash))
path
(fmt (query-path-hash store path)))
#t)) #t))