# KH: patched for runtimeupdate

To: vim-dev@vim.org

Subject: patch 7.0.230

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.0.230

Problem:    After using ":lcd" a script doesn't know how to restore the

	    current directory.

Solution:   Add the haslocaldir() function. (Bob Hiestand)

Files:	    runtime/doc/usr_41.txt, runtime/doc/eval.txt, src/eval.c

*** ../vim-7.0.229/runtime/doc/usr_41.txt	Sun May  7 17:02:39 2006

--- runtime/doc/usr_41.txt	Thu Apr 26 17:06:48 2007

***************

*** 1,4 ****

! *usr_41.txt*	For Vim version 7.0.  Last change: 2006 Aug 16

  		     VIM USER MANUAL - by Bram Moolenaar

--- 1,4 ----

! *usr_41.txt*	For Vim version 7.0.  Last change: 2007 Apr 26

  		     VIM USER MANUAL - by Bram Moolenaar

***************

*** 703,708 ****

--- 703,709 ----

  	isdirectory()		check if a directory exists

  	getfsize()		get the size of a file

  	getcwd()		get the current working directory

+ 	haslocaldir()		check if current window used |:lcd|

  	tempname()		get the name of a temporary file

  	mkdir()			create a new directory

  	delete()		delete a file

*** ../vim-7.0.229/runtime/doc/eval.txt	Tue Mar 27 10:20:58 2007

--- runtime/doc/eval.txt	Tue Apr 24 21:50:49 2007

***************

*** 1,4 ****

! *eval.txt*      For Vim version 7.0.  Last change: 2006 Nov 01

  		  VIM REFERENCE MANUAL    by Bram Moolenaar

--- 1,4 ----

! *eval.txt*      For Vim version 7.0.  Last change: 2007 Apr 24

  		  VIM REFERENCE MANUAL    by Bram Moolenaar

***************

*** 1623,1628 ****

--- 1633,1639 ----

  globpath( {path}, {expr})	String	do glob({expr}) for all dirs in {path}

  has( {feature})			Number	TRUE if feature {feature} supported

  has_key( {dict}, {key})		Number	TRUE if {dict} has entry {key}

+ haslocaldir()			Number	TRUE if current window executed |:lcd|

  hasmapto( {what} [, {mode} [, {abbr}]])

  				Number	TRUE if mapping to {what} exists

  histadd( {history},{item})	String	add an item to a history

***************

*** 3016,3021 ****

--- 3041,3049 ----

  		The result is a Number, which is 1 if |Dictionary| {dict} has

  		an entry with key {key}.  Zero otherwise.

+ haslocaldir()						*haslocaldir()*

+ 		The result is a Number, which is 1 when the current

+                 window has set a local path via |:lcd|, and 0 otherwise.

  hasmapto({what} [, {mode} [, {abbr}]])			*hasmapto()*

  		The result is a Number, which is 1 if there is a mapping that

*** ../vim-7.0.229/src/eval.c	Thu Apr 26 10:55:46 2007

--- src/eval.c	Thu Apr 26 10:52:09 2007

***************

*** 541,546 ****

--- 541,547 ----

  static void f_globpath __ARGS((typval_T *argvars, typval_T *rettv));

  static void f_has __ARGS((typval_T *argvars, typval_T *rettv));

  static void f_has_key __ARGS((typval_T *argvars, typval_T *rettv));

+ static void f_haslocaldir __ARGS((typval_T *argvars, typval_T *rettv));

  static void f_hasmapto __ARGS((typval_T *argvars, typval_T *rettv));

  static void f_histadd __ARGS((typval_T *argvars, typval_T *rettv));

  static void f_histdel __ARGS((typval_T *argvars, typval_T *rettv));

***************

*** 7110,7115 ****

--- 7111,7117 ----

      {"globpath",	2, 2, f_globpath},

      {"has",		1, 1, f_has},

      {"has_key",		2, 2, f_has_key},

+     {"haslocaldir",	0, 0, f_haslocaldir},

      {"hasmapto",	1, 3, f_hasmapto},

      {"highlightID",	1, 1, f_hlID},		/* obsolete */

      {"highlight_exists",1, 1, f_hlexists},	/* obsolete */

***************

*** 11131,11136 ****

--- 11133,11150 ----

      rettv->vval.v_number = dict_find(argvars[0].vval.v_dict,

  				      get_tv_string(&argvars[1]), -1) != NULL;

+ }

+ 

+ /*

+  * "haslocaldir()" function

+  */

+ /*ARGSUSED*/

+     static void

+ f_haslocaldir(argvars, rettv)

+     typval_T	*argvars;

+     typval_T	*rettv;

+ {

+     rettv->vval.v_number = (curwin->w_localdir != NULL);

  }

  /*

*** ../vim-7.0.229/src/version.c	Thu Apr 26 16:50:05 2007

--- src/version.c	Thu Apr 26 17:04:15 2007

***************

*** 668,669 ****

--- 668,671 ----

  {   /* Add new patch number below this line */

+ /**/

+     230,

  /**/

-- 

hundred-and-one symptoms of being an internet addict:

22. You've already visited all the links at Yahoo and you're halfway through

    Lycos.

 /// 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    ///