1 files changed, 9 insertions, 0 deletions
diff --git a/test/Tests/Readers/Org.hs b/test/Tests/Readers/Org.hs
index 55fa00d1a..7a7960396 100644
--- a/test/Tests/Readers/Org.hs
+++ b/test/Tests/Readers/Org.hs
@@ -1559,6 +1559,15 @@ tests =
             params = [ ("data-org-language", "sh"), ("startFrom", "10") ]
         in codeBlockWith ("", classes, params) ":() { :|:& };:\n"
 
+      , "Source block with multi-word parameter values" =:
+        unlines [ "#+BEGIN_SRC dot :cmdline -Kdot -Tpng "
+                , "digraph { id [label=\"ID\"] }"
+                , "#+END_SRC"
+                ] =?>
+        let classes = [ "dot" ]
+            params = [ ("cmdline", "-Kdot -Tpng") ]
+        in codeBlockWith ("", classes, params) "digraph { id [label=\"ID\"] }\n"
+
       , "Example block" =:
            unlines [ "#+begin_example"
                    , "A chosen representation of"