commit 362e1a30c6f3527d5d0efc328c2fb448290cd6fc
author Bram Moolenaar <Bram@vim.org> Mon Mar 06 23:29:24 2006 +0000
committer Bram Moolenaar <Bram@vim.org> Mon Mar 06 23:29:24 2006 +0000
tree 91c408352947bec09aee2032949ef1acef606d15
parent 768b8c4dbcb3cdaccab87daa833ab176a438cc3c

updated for version 7.0216

src/if_perl.xs

diff --git a/src/if_perl.xs b/src/if_perl.xs
index 0f1dcd2..14cb86f 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -427,9 +427,10 @@
  * work properly.
  */
     char_u *
-eval_to_string(arg, nextcmd)
+eval_to_string(arg, nextcmd, dolist)
     char_u	*arg;
     char_u	**nextcmd;
+    int		dolist;
 {
     return NULL;
 }
@@ -827,7 +828,7 @@
     PREINIT:
 	char_u *value;
     PPCODE:
-	value = eval_to_string((char_u *)str, (char_u**)0);
+	value = eval_to_string((char_u *)str, (char_u **)0, TRUE);
 	if (value == NULL)
 	{
 	    XPUSHs(sv_2mortal(newSViv(0)));