diff --git a/doc/build.scm b/doc/build.scm
index 664766a1f5..7a2b562028 100644
--- a/doc/build.scm
+++ b/doc/build.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2019-2023 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2019-2024 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2020 Björn Höfling <bjoern.hoefling@bjoernhoefling.de>
 ;;; Copyright © 2022 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;;
@@ -1061,8 +1061,7 @@ (define exp
                  (bindtextdomain "guix-manual"
                                  #+(guix-manual-text-domain source))
                  (bindtextdomain "iso_639-3"      ;language names
-                                 #+(file-append iso-codes/pinned
-                                                "/share/locale"))
+                                 #+(file-append iso-codes "/share/locale"))
                  (setenv "LANGUAGE" ,language)
                  (write (gettext ,str ,domain))))
 
@@ -1080,7 +1079,7 @@ (define exp
           (define %iso639-languages
             (vector->list
              (assoc-ref (call-with-input-file
-                            #+(file-append iso-codes/pinned
+                            #+(file-append iso-codes
                                            "/share/iso-codes/json/iso_639-3.json")
                           json->scm)
                         "639-3")))