diff --git a/guix/import/texlive.scm b/guix/import/texlive.scm
index d0307ae944..e22823e807 100644
--- a/guix/import/texlive.scm
+++ b/guix/import/texlive.scm
@@ -197,12 +197,11 @@ (define tlpdb
                      (loop all current #false))))))))))))
 
 (define (files->directories files)
-  (pk 'f->d
-   (map (cut string-join <> "/" 'suffix)
-        (delete-duplicates (map (lambda (file)
-                                  (drop-right (string-split file #\/) 1))
-                                files)
-                           equal?))))
+  (map (cut string-join <> "/" 'suffix)
+       (delete-duplicates (map (lambda (file)
+                                 (drop-right (string-split file #\/) 1))
+                               files)
+                          equal?)))
 
 (define (tlpdb->package name)
   (and-let* ((data (assoc-ref (tlpdb) name))