4 From: Bram Moolenaar <Bram@moolenaar.net>
6 Content-Type: text/plain; charset=ISO-8859-1
7 Content-Transfer-Encoding: 8bit
11 Problem: The Perl Msg() function doesn't stop when "q" is typed at the more
12 prompt. (Hari Krishna Dara)
13 Solution: Check got_int.
17 *** ../vim-7.1.137/src/if_perl.xs Sat Sep 15 14:48:57 2007
18 --- src/if_perl.xs Wed Oct 3 17:00:16 2007
22 char *token = (char *)s;
24 ! while ((next = strchr(token, '\n')))
26 *next++ = '\0'; /* replace \n with \0 */
27 msg_attr((char_u *)token, attr);
31 msg_attr((char_u *)token, attr);
36 char *token = (char *)s;
38 ! while ((next = strchr(token, '\n')) && !got_int)
40 *next++ = '\0'; /* replace \n with \0 */
41 msg_attr((char_u *)token, attr);
44 ! if (*token && !got_int)
45 msg_attr((char_u *)token, attr);
48 *** ../vim-7.1.137/src/version.c Sun Oct 7 15:44:28 2007
49 --- src/version.c Tue Oct 9 10:45:08 2007
53 { /* Add new patch number below this line */
59 A consultant is a person who takes your money and annoys your employees while
60 tirelessly searching for the best way to extend the consulting contract.
61 (Scott Adams - The Dilbert principle)
63 /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
64 /// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
65 \\\ download, build and distribute -- http://www.A-A-P.org ///
66 \\\ help me help AIDS victims -- http://ICCF-Holland.org ///