diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index cb22242c53..8d3f43e3f7 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -307,9 +307,9 @@ (define-public guile-next
     (properties '((ftp-server . "alpha.gnu.org")
                   (upstream-name . "guile")))))
 
-(define (make-guile-readline guile)
+(define* (make-guile-readline guile #:optional (name "guile-readline"))
   (package
-    (name "guile-readline")
+    (name name)
     (version (package-version guile))
     (source (package-source guile))
     (build-system gnu-build-system)
@@ -366,6 +366,9 @@ (define (make-guile-readline guile)
 (define-public guile-readline
   (make-guile-readline guile-2.2))
 
+(define-public guile3.0-readline
+  (make-guile-readline guile-next "guile3.0-readline"))
+
 (define (guile-variant-package-name prefix)
   (lambda (name)
     "Return NAME with PREFIX instead of \"guile-\", when applicable."