diff --git a/testsuite/tests/rename/should_compile/T5867.hs b/testsuite/tests/rename/should_compile/T5867.hs
new file mode 100644
index 0000000000000000000000000000000000000000..6bf337fea94c464cc5f29b19f0429fe04abda9a1
--- /dev/null
+++ b/testsuite/tests/rename/should_compile/T5867.hs
@@ -0,0 +1,5 @@
+module T5867( f ) where
+import T5867a
+
+boo = f
+bar = f
diff --git a/testsuite/tests/rename/should_compile/T5867.stderr b/testsuite/tests/rename/should_compile/T5867.stderr
new file mode 100644
index 0000000000000000000000000000000000000000..35941c8417c0d52277197b62a307c1f3f9a3763f
--- /dev/null
+++ b/testsuite/tests/rename/should_compile/T5867.stderr
@@ -0,0 +1,8 @@
+
+T5867.hs:4:7: Warning:
+    In the use of `f' (imported from T5867a):
+    Deprecated: "Don't use f!"
+
+T5867.hs:5:7: Warning:
+    In the use of `f' (imported from T5867a):
+    Deprecated: "Don't use f!"
diff --git a/testsuite/tests/rename/should_compile/T5867a.hs b/testsuite/tests/rename/should_compile/T5867a.hs
new file mode 100644
index 0000000000000000000000000000000000000000..e27937461ce1943cd072bf909f41b1312df76302
--- /dev/null
+++ b/testsuite/tests/rename/should_compile/T5867a.hs
@@ -0,0 +1,4 @@
+module T5867a where
+
+{-# DEPRECATED f "Don't use f!" #-}
+f x = x
diff --git a/testsuite/tests/rename/should_compile/all.T b/testsuite/tests/rename/should_compile/all.T
index 3ed2a1fb0f4e2a960387d0218465e89bef5a6048..c4450305add19d9cbee87236d9d86c5e35b71e86 100644
--- a/testsuite/tests/rename/should_compile/all.T
+++ b/testsuite/tests/rename/should_compile/all.T
@@ -186,3 +186,6 @@ test('T5592',
       extra_clean(['T5592a.hi',      'T5592a.o'])],
      multimod_compile_and_run,
      ['T5592', '-v0'])
+test('T5867',
+     extra_clean(['T5867a.hi', 'T5867a.o']),
+     multimod_compile, ['T5867', '-v0'])