(use-modules (ice-9 regex)
(ice-9 string-fun)
+ (scm paper-system)
(ice-9 format)
(guile)
(srfi srfi-1)
channel))
(outputter (ly:make-paper-outputter
ctor-arg
- "socket"))
+ 'socket))
(systems (ly:paper-book-systems book)))
(if (pair? systems)
(define-public (convert-to-ps . args) #t)
(define-public (convert-to-pdf . args) #t)
(define-public (convert-to-png . args) #t)
-(define-public (convert-to-dvi . args) #t)
-(define-public (convert-to-tex . args) #t)