2 files changed, 9 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index 6ba2371656..bdd22c119f 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1431,7 +1431,7 @@ EeiT	|void *	|my_memrchr	|NN const char * s|const char c|const STRLEN len
 Adp	|I32	|my_pclose	|NULLOK PerlIO* ptr
 Adp	|PerlIO*|my_popen	|NN const char* cmd|NN const char* mode
 #endif
-Ap	|PerlIO*|my_popen_list	|NN const char* mode|int n|NN SV ** args
+Cpd	|PerlIO*|my_popen_list	|NN const char* mode|int n|NN SV ** args
 Apd	|void	|my_setenv	|NULLOK const char* nam|NULLOK const char* val
 m	|I32	|my_stat
 pX	|I32	|my_stat_flags	|NULLOK const U32 flags
diff --git a/util.c b/util.c
index b0907db198..ca7d374841 100644
--- a/util.c
+++ b/util.c
@@ -2662,6 +2662,14 @@ Perl_unlnk(pTHX_ const char *f)	/* unlink all versions of a file */
   #endif
 #endif
 
+/*
+=for apidoc my_popen_list
+
+Implementing function on some systems for PerlProc_popen_list()
+
+=cut
+*/
+
 PerlIO *
 Perl_my_popen_list(pTHX_ const char *mode, int n, SV **args)
 {