diff --git a/test/integration/tests/1336-new-package-names/Main.hs b/test/integration/tests/1336-new-package-names/Main.hs
new file mode 100644
index 0000000000..8662607a85
--- /dev/null
+++ b/test/integration/tests/1336-new-package-names/Main.hs
@@ -0,0 +1,14 @@
+import StackTest
+import System.Directory
+import System.FilePath
+
+main :: IO ()
+main = do
+    stack ["new", "1234a-4b-b4-abc-12b34"]
+    doesExist "./1234a-4b-b4-abc-12b34/stack.yaml"
+    stackErr ["new", "1234-abc"]
+    doesNotExist "./1234-abc/stack.yaml"
+    doesNotExist "./1234-abc"
+    stackErr ["new", "1-abc"]
+    stackErr ["new", "44444444444444"]
+    stackErr ["new", "abc-1"]