ambrevar/shell: Rename checksum to sha1.
parent
f84f5f026a
commit
b368c7f349
|
@ -291,8 +291,8 @@ Return process name as second value."
|
||||||
process-pid
|
process-pid
|
||||||
process-name)))
|
process-name)))
|
||||||
|
|
||||||
(export-always 'checksum)
|
(export-always 'sha1)
|
||||||
(defun checksum (file) ; TODO: Use pure CL version.
|
(defun sha1 (file) ; TODO: Use pure CL / FFI version?
|
||||||
"Return checksum of FILE."
|
"Return checksum of FILE."
|
||||||
(first (first (tokenize (cmd:$cmd "sha1sum" file)))))
|
(first (first (tokenize (cmd:$cmd "sha1sum" file)))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue