From 836e2bebd68bd082b232b442c385b8ac140b0e52 Mon Sep 17 00:00:00 2001 From: Karsten Hopp Date: Feb 25 2008 15:36:18 +0000 Subject: - patchlevel 248 --- diff --git a/7.1.248 b/7.1.248 new file mode 100644 index 0000000..57be25d --- /dev/null +++ b/7.1.248 @@ -0,0 +1,138 @@ +To: vim-dev@vim.org +Subject: Patch 7.1.248 +Fcc: outbox +From: Bram Moolenaar +Mime-Version: 1.0 +Content-Type: text/plain; charset=ISO-8859-1 +Content-Transfer-Encoding: 8bit +------------ + +Patch 7.1.248 +Problem: Can't set the '" mark. Can't know if setpos() was successful. +Solution: Allow setting the '" mark with setpos(). Have setpos() return a + value indicating success/failure. +Files: runtime/doc/eval.txt, src/eval.c, src/mark.c + + +*** ../vim-7.1.247/runtime/doc/eval.txt Sat Jan 12 16:45:25 2008 +--- runtime/doc/eval.txt Wed Feb 13 11:49:16 2008 +*************** +*** 1,4 **** +! *eval.txt* For Vim version 7.1. Last change: 2008 Jan 11 + + + VIM REFERENCE MANUAL by Bram Moolenaar +--- 1,4 ---- +! *eval.txt* For Vim version 7.1. Last change: 2008 Feb 13 + + + VIM REFERENCE MANUAL by Bram Moolenaar +*************** +*** 4523,4528 **** +--- 4528,4536 ---- + character. E.g., a position within a or after the last + character. + ++ Returns 0 when the position could be set, -1 otherwise. ++ An error message is given if {expr} is invalid. ++ + Also see |getpos()| + + This does not restore the preferred column for moving +*** ../vim-7.1.247/src/eval.c Tue Jan 22 11:58:41 2008 +--- src/eval.c Wed Feb 13 11:54:09 2008 +*************** +*** 14776,14799 **** + int fnum; + char_u *name; + + name = get_tv_string_chk(argvars); + if (name != NULL) + { + if (list2fpos(&argvars[1], &pos, &fnum) == OK) + { + --pos.col; +! if (name[0] == '.') /* cursor */ + { + if (fnum == curbuf->b_fnum) + { + curwin->w_cursor = pos; + check_cursor(); + } + else + EMSG(_(e_invarg)); + } +! else if (name[0] == '\'') /* mark */ +! (void)setmark_pos(name[1], &pos, fnum); + else + EMSG(_(e_invarg)); + } +--- 14778,14808 ---- + int fnum; + char_u *name; + ++ rettv->vval.v_number = -1; + name = get_tv_string_chk(argvars); + if (name != NULL) + { + if (list2fpos(&argvars[1], &pos, &fnum) == OK) + { + --pos.col; +! if (name[0] == '.' && name[1] == NUL) + { ++ /* set cursor */ + if (fnum == curbuf->b_fnum) + { + curwin->w_cursor = pos; + check_cursor(); ++ rettv->vval.v_number = 0; + } + else + EMSG(_(e_invarg)); + } +! else if (name[0] == '\'' && name[1] != NUL && name[2] == NUL) +! { +! /* set mark */ +! if (setmark_pos(name[1], &pos, fnum) == OK) +! rettv->vval.v_number = 0; +! } + else + EMSG(_(e_invarg)); + } +*** ../vim-7.1.247/src/mark.c Thu Jan 3 20:21:34 2008 +--- src/mark.c Wed Feb 13 11:42:30 2008 +*************** +*** 79,84 **** +--- 79,90 ---- + return OK; + } + ++ if (c == '"') ++ { ++ curbuf->b_last_cursor = *pos; ++ return OK; ++ } ++ + /* Allow setting '[ and '] for an autocommand that simulates reading a + * file. */ + if (c == '[') +*** ../vim-7.1.247/src/version.c Wed Feb 13 10:57:11 2008 +--- src/version.c Wed Feb 13 12:39:23 2008 +*************** +*** 668,669 **** +--- 668,671 ---- + { /* Add new patch number below this line */ ++ /**/ ++ 248, + /**/ + +-- +"Making it up? Why should I want to make anything up? Life's bad enough +as it is without wanting to invent any more of it." + -- Marvin, the Paranoid Android in Douglas Adams' + "The Hitchhiker's Guide to the Galaxy" + + /// 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 ///