Jon Boone pushed to branch issue-154-piglatin-translation-doesnt-work-anymore at cmucl / cmucl
Commits:
-
2c5f040e
by Jon Boone at 2023-06-04T20:27:45-04:00
1 changed file:
Changes:
| ... | ... | @@ -834,11 +834,11 @@ |
| 834 | 834 | (:tag :issues)
|
| 835 | 835 | (let ((old-locale intl::*locale*)
|
| 836 | 836 | (locale "en_US.UTF-8@piglatin")
|
| 837 | - (piglatin_text "Ethay izesay ofway away eamstray inway-ufferbay."))
|
|
| 837 | + (piglatin-text "Ethay izesay ofway away eamstray inway-ufferbay."))
|
|
| 838 | 838 | (unwind-protect
|
| 839 | 839 | (progn
|
| 840 | 840 | (assert-equal locale (intl:setlocale "en_US.UTF-8@piglatin"))
|
| 841 | - (assert-equal piglatin_text (intl:dgettext "cmucl" "The size of a stream in-buffer.")))
|
|
| 841 | + (assert-equal piglatin-text (intl:dgettext "cmucl" "The size of a stream in-buffer.")))
|
|
| 842 | 842 | (intl:setlocale old-locale))))
|
| 843 | 843 | |
| 844 | 844 | (define-test issue.158
|