diff --git a/src/testdir/test14.in b/src/testdir/test14.in
index ebcb58c..e6816a3 100644
--- a/src/testdir/test14.in
+++ b/src/testdir/test14.in
@@ -47,6 +47,15 @@
 /two
 :call search('.', 'c')
 :call append(line('$'), getline('.')[col('.') - 1:])
+:"
+/^substitute
+:s/foo/bar/
+:$put =@/
+/^substitute
+:keeppatterns s/asdf/xyz/
+:$put =@/
+/^substitute
+Y:$put =@0
 :/^search()/,$w >>test.out
 :qa!
 ENDTEST
@@ -81,6 +90,7 @@
 
 foobar
 
+substitute foo asdf
 
 one two
 search()
diff --git a/src/testdir/test14.ok b/src/testdir/test14.ok
index 1fd8916..ae3da29 100644
--- a/src/testdir/test14.ok
+++ b/src/testdir/test14.ok
@@ -20,3 +20,6 @@
 1
 1
 two
+foo
+^substitute
+substitute bar xyz