Bug 31338

Summary: Не работает <source lang="scheme">...</source>
Product: Infrastructure Reporter: solo <solo>
Component: www.altlinux.orgAssignee: Nobody's working on this, feel free to take it <nobody>
Status: CLOSED FIXED QA Contact: Nobody's working on this, feel free to take it <nobody>
Severity: normal    
Priority: P3 CC: lineprinter
Version: unspecified   
Hardware: all   
OS: Linux   

Description solo 2015-10-07 16:23:58 MSK 
Не работает <source lang="scheme">...</source> -- часть кода не отображается вообще. Например (см. https://www.altlinux.org/Alterator/objects), при использовании кода:

<source lang="scheme">
(define (make-point-2d x y)
                   (lambda (op . value)
                        (case op
                             ((get-x) x)
                             ((get-y) y)
                             ((set-x) (set! x (car value)))
                             ((set-y) (set! y (car value))))))

(define point (make-point-2d 3 4))
(point 'get-x) ==> вернёт 3
(point 'set-x 10) ; запомнит в своём окружении новое значение x
(point 'get-x) ==> вернёт 10</source>

в блоке отображается только строка:

; запомнит в своём окружении новое значение x
Comment 1 lineprinter@altlinux.org 2017-09-05 15:22:47 MSK 
С новой mediawiki вроде работает.