home *** CD-ROM | disk | FTP | other *** search
- To: vim-dev@vim.org
- Subject: Patch 7.1.138
- Fcc: outbox
- From: Bram Moolenaar <Bram@moolenaar.net>
- Mime-Version: 1.0
- Content-Type: text/plain; charset=ISO-8859-1
- Content-Transfer-Encoding: 8bit
- ------------
-
- Patch 7.1.138
- Problem: The Perl Msg() function doesn't stop when "q" is typed at the more
- prompt. (Hari Krishna Dara)
- Solution: Check got_int.
- Files: src/if_perl.xs
-
-
- *** ../vim-7.1.137/src/if_perl.xs Sat Sep 15 14:48:57 2007
- --- src/if_perl.xs Wed Oct 3 17:00:16 2007
- ***************
- *** 445,457 ****
- char *next;
- char *token = (char *)s;
-
- ! while ((next = strchr(token, '\n')))
- {
- *next++ = '\0'; /* replace \n with \0 */
- msg_attr((char_u *)token, attr);
- token = next;
- }
- ! if (*token)
- msg_attr((char_u *)token, attr);
- }
-
- --- 445,457 ----
- char *next;
- char *token = (char *)s;
-
- ! while ((next = strchr(token, '\n')) && !got_int)
- {
- *next++ = '\0'; /* replace \n with \0 */
- msg_attr((char_u *)token, attr);
- token = next;
- }
- ! if (*token && !got_int)
- msg_attr((char_u *)token, attr);
- }
-
- *** ../vim-7.1.137/src/version.c Sun Oct 7 15:44:28 2007
- --- src/version.c Tue Oct 9 10:45:08 2007
- ***************
- *** 668,669 ****
- --- 668,671 ----
- { /* Add new patch number below this line */
- + /**/
- + 138,
- /**/
-
- --
- A consultant is a person who takes your money and annoys your employees while
- tirelessly searching for the best way to extend the consulting contract.
- (Scott Adams - The Dilbert principle)
-
- /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
- /// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
- \\\ download, build and distribute -- http://www.A-A-P.org ///
- \\\ help me help AIDS victims -- http://ICCF-Holland.org ///
-