ambrevar/shell: Rename checksum to sha1.

master
Pierre Neidhardt 2021-01-13 15:08:20 +01:00
parent f84f5f026a
commit b368c7f349
1 changed files with 2 additions and 2 deletions

View File

@ -291,8 +291,8 @@ Return process name as second value."
process-pid
process-name)))
(export-always 'checksum)
(defun checksum (file) ; TODO: Use pure CL version.
(export-always 'sha1)
(defun sha1 (file) ; TODO: Use pure CL / FFI version?
"Return checksum of FILE."
(first (first (tokenize (cmd:$cmd "sha1sum" file)))))