1 files changed, 8 insertions, 23 deletions
diff --git a/testsuite/tests/warnings/should_compile/T14794e.hs b/testsuite/tests/warnings/should_compile/T14794e.hs
index 051cf347d6..b53244de6c 100644
--- a/testsuite/tests/warnings/should_compile/T14794e.hs
+++ b/testsuite/tests/warnings/should_compile/T14794e.hs
@@ -1,31 +1,16 @@
 {-# LANGUAGE PatternSynonyms #-}
-{-# OPTIONS_GHC -Wmissing-signatures #-}
+{-# OPTIONS_GHC -Wmissing-exported-pattern-synonym-signatures #-}
 
-module T14794e (test1, pattern Test2, test3, pattern Test4) where
+module T14794e (testExported, pattern TestExported) where
 
--- This should generate warnings with;
--- -Wmissing-signatures
+-- These should generate warnings:
 
-test3 = True
+pattern TestExported <- True
 
-pattern Test4 <- True
+-- These should not generate warnings:
 
-test7 = True
+testExported = True
 
-pattern Test8 <- True
+testUnexported = True
 
-
--- This should not generate warnings with;
--- -Wmissing-signatures
-
-test1 :: Bool
-test1 = True
-
-pattern Test2 :: Bool
-pattern Test2 <- True
-
-test5 :: Bool
-test5 = True
-
-pattern Test6 :: Bool
-pattern Test6 <- True
+pattern TestUnexported <- True