diff options
| author | Danny Milosavljevic <dannym@scratchpost.org> | 2017-05-31 19:38:49 +0200 |
|---|---|---|
| committer | Danny Milosavljevic <dannym@scratchpost.org> | 2017-05-31 19:38:49 +0200 |
| commit | cdc701ea48207b16fd181cac3c74172c6db483ed (patch) | |
| tree | 44abead553fe346c860a170800823be7df622eff /gnu/build | |
| parent | 1c797d4bfb26ac9da6fdf533b533e5d42fe7ef91 (diff) | |
| download | guix-cdc701ea48207b16fd181cac3c74172c6db483ed.tar.gz guix-cdc701ea48207b16fd181cac3c74172c6db483ed.zip | |
gnu: build: Improve comments.
* gnu/build/file-systems.scm (iso9660-superblock-volume-name):
Add clarifying comment.
Diffstat (limited to 'gnu/build')
| -rw-r--r-- | gnu/build/file-systems.scm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gnu/build/file-systems.scm b/gnu/build/file-systems.scm index 17c1182ce6..3b831c0ec0 100644 --- a/gnu/build/file-systems.scm +++ b/gnu/build/file-systems.scm @@ -283,6 +283,7 @@ SBLOCK as a bytevector." (define (iso9660-superblock-volume-name sblock) "Return the volume name of SBLOCK as a string. The volume name is an ASCII string. Trailing spaces are trimmed." + ;; Note: Valid characters are of the set "[0-9][A-Z]_" (ECMA-119 Appendix A) (string-trim-right (latin1->string (sub-bytevector sblock 40 32) (lambda (c) #f)) #\space)) |