diff --git a/remix/tests/pr/pr1439/lang.rkt b/remix/tests/pr/pr1439/lang.rkt
new file mode 100644
index 0000000..ac8a601
--- /dev/null
+++ b/remix/tests/pr/pr1439/lang.rkt
@@ -0,0 +1,3 @@
+#lang racket/base
+(provide (all-from-out racket/base)
+         (rename-out [quote #%dot]))
diff --git a/remix/tests/pr/pr1439/reader.rkt b/remix/tests/pr/pr1439/reader.rkt
new file mode 100644
index 0000000..f83d36d
--- /dev/null
+++ b/remix/tests/pr/pr1439/reader.rkt
@@ -0,0 +1,5 @@
+#lang s-exp syntax/module-reader
+"lang.rkt"
+#:wrapper1 (lambda (thunk)
+             (parameterize ([read-cdot #true])
+               (thunk)))
diff --git a/remix/tests/pr/pr1439/use.rkt b/remix/tests/pr/pr1439/use.rkt
new file mode 100644
index 0000000..fe81095
--- /dev/null
+++ b/remix/tests/pr/pr1439/use.rkt
@@ -0,0 +1,2 @@
+#lang reader "reader.rkt"
+x.
diff --git a/remix/tests/reader.rkt b/remix/tests/reader.rkt
index 77c1e08..e2b0b86 100644
--- a/remix/tests/reader.rkt
+++ b/remix/tests/reader.rkt
@@ -37,6 +37,7 @@
    ["[1 2 3]" (#%brackets 1 2 3)]
    ["{1 2 3}" (#%braces 1 2 3)]
    ["|a.b|" a.b]
+   ["x." (#%dot x)]
    ["a.b" (#%dot a b)]
    ["a .b" (#%dot a b)]
    ["a. b" (#%dot a b)]