(lint (core-lint version (or (core-changes) '()) dirt)))
(if (not (null? lint))
(begin
- (log "# "(project-name)" "(version-string version)":\n")
+ (log "\n# "(project-name)" "(version-string version)"\n")
(write-lint lint)))))
(define (plugin-status plugin dirt)
(lint (plugin-lint plugin version changes dirt)))
(if (not (null? lint))
(begin
- (log "# "(plugin-name plugin)" "(version-string version)":\n")
+ (log "\n# "(plugin-name plugin)" "(version-string version)"\n")
(write-lint lint)))))
(define (write-lint lint)