commit aa8494a13eb1f8b5eb4a417bb03e7bb5ea399c57
author Bram Moolenaar <Bram@vim.org> Tue Oct 09 08:47:27 2007 +0000
committer Bram Moolenaar <Bram@vim.org> Tue Oct 09 08:47:27 2007 +0000
tree 2ea989cefad82b21c425b198c68cf91f3f246ce5
parent af92ee8e89febb384c4f6a723c39b8db5d313bcd

updated for version 7.1-138

src/if_perl.xs

diff --git a/src/if_perl.xs b/src/if_perl.xs
index 2e27fed..acf7f86 100644
--- a/src/if_perl.xs
+++ b/src/if_perl.xs
@@ -445,13 +445,13 @@
     char *next;
     char *token = (char *)s;
 
-    while ((next = strchr(token, '\n')))
+    while ((next = strchr(token, '\n')) && !got_int)
     {
 	*next++ = '\0';			/* replace \n with \0 */
 	msg_attr((char_u *)token, attr);
 	token = next;
     }
-    if (*token)
+    if (*token && !got_int)
 	msg_attr((char_u *)token, attr);
 }