read-print: Remove unused procedure.

* guix/read-print.scm (combine-vertical-space): Remove.
This commit is contained in:
Ludovic Courtès 2022-08-10 16:40:06 +02:00
parent ebda12e1d2
commit b21d05d232
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

View File

@ -82,11 +82,6 @@
(define vertical-space (record-type-constructor <vertical-space>))
(define vertical-space-height (record-accessor <vertical-space> 'height))
(define (combine-vertical-space x y)
"Return vertical space as high as the combination of X and Y."
(vertical-space (+ (vertical-space-height x)
(vertical-space-height y))))
(define canonicalize-vertical-space
(let ((unit (vertical-space 1)))
(lambda (space)