diff --git a/i18n/locale/cmucl.pot b/i18n/locale/cmucl.pot
index 6ddb2afc7b0f67019f109ef10b28f00c64fbd6d4..92ace3df87aacd73e9b013f6f0d96490bb138e1f 100644
--- a/i18n/locale/cmucl.pot
+++ b/i18n/locale/cmucl.pot
@@ -3294,27 +3294,36 @@ msgstr ""
 
 #: src/code/list.lisp
 msgid ""
-"Applies fn to successive elements of lists, returns its second argument."
+"Applies Function to successive elements of each List, and returns\n"
+"  its second argument."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns list of results."
+msgid ""
+"Applies Function to successive elements of each List, and returns a\n"
+"  list of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns NCONC of results."
+msgid ""
+"Applies Function to successive elements of each List, and returns\n"
+"  NCONC of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns ()."
+msgid "Applies Function to successive CDRs of each List, and returns ()."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns list of results."
+msgid ""
+"Applies Function to successive CDRs of each List, and returns list\n"
+"  of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of lists, returns NCONC of results."
+msgid ""
+"Applies Function to successive CDRs of each List, and returns NCONC\n"
+"  of results."
 msgstr ""
 
 #: src/code/list.lisp
diff --git a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
index 8ed111fff81e6e40e6f4c99bacdaf4c84552e78b..78da94f622d5803479df64a03f8154a02e54c69b 100644
--- a/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/en@piglatin/LC_MESSAGES/cmucl.po
@@ -4546,36 +4546,51 @@ msgstr ""
 "  unctionfay andway accumulatingway esultsray asway esiredday."
 
 #: src/code/list.lisp
+#, fuzzy
 msgid ""
-"Applies fn to successive elements of lists, returns its second argument."
+"Applies Function to successive elements of each List, and returns\n"
+"  its second argument."
 msgstr ""
 "Appliesway nfay otay uccessivesay elementsway ofway istslay, eturnsray "
 "itsway econdsay argumentway."
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns list of results."
+#, fuzzy
+msgid ""
+"Applies Function to successive elements of each List, and returns a\n"
+"  list of results."
 msgstr ""
 "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray istlay "
 "ofway esultsray."
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns NCONC of results."
+#, fuzzy
+msgid ""
+"Applies Function to successive elements of each List, and returns\n"
+"  NCONC of results."
 msgstr ""
 "Appliesway nfay otay uccessivesay elementsway ofway istlay, eturnsray NCONC "
 "ofway esultsray."
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns ()."
+#, fuzzy
+msgid "Applies Function to successive CDRs of each List, and returns ()."
 msgstr "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray ()."
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns list of results."
+#, fuzzy
+msgid ""
+"Applies Function to successive CDRs of each List, and returns list\n"
+"  of results."
 msgstr ""
 "Appliesway nfay otay uccessivesay Drscay ofway istlay, eturnsray istlay "
 "ofway esultsray."
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of lists, returns NCONC of results."
+#, fuzzy
+msgid ""
+"Applies Function to successive CDRs of each List, and returns NCONC\n"
+"  of results."
 msgstr ""
 "Appliesway nfay otay uccessivesay Drscay ofway istslay, eturnsray NCONC "
 "ofway esultsray."
diff --git a/i18n/locale/ko/LC_MESSAGES/cmucl.po b/i18n/locale/ko/LC_MESSAGES/cmucl.po
index a8dcf1de53dadcd03f1243465699d2894a5c9602..a806becfea18209742c3fe300a6e3b7010d6dbab 100644
--- a/i18n/locale/ko/LC_MESSAGES/cmucl.po
+++ b/i18n/locale/ko/LC_MESSAGES/cmucl.po
@@ -3295,27 +3295,36 @@ msgstr ""
 
 #: src/code/list.lisp
 msgid ""
-"Applies fn to successive elements of lists, returns its second argument."
+"Applies Function to successive elements of each List, and returns\n"
+"  its second argument."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns list of results."
+msgid ""
+"Applies Function to successive elements of each List, and returns a\n"
+"  list of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive elements of list, returns NCONC of results."
+msgid ""
+"Applies Function to successive elements of each List, and returns\n"
+"  NCONC of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns ()."
+msgid "Applies Function to successive CDRs of each List, and returns ()."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of list, returns list of results."
+msgid ""
+"Applies Function to successive CDRs of each List, and returns list\n"
+"  of results."
 msgstr ""
 
 #: src/code/list.lisp
-msgid "Applies fn to successive CDRs of lists, returns NCONC of results."
+msgid ""
+"Applies Function to successive CDRs of each List, and returns NCONC\n"
+"  of results."
 msgstr ""
 
 #: src/code/list.lisp