[Emacs-diffs] /srv/bzr/emacs/emacs-23 r100563: * src/nsfns.m (Fns_read_file_name): Doc fix (Bug#8534).

[Chong Yidong]

------------------------------------------------------------
revno: 100563
committer: Chong Yidong <address@hidden>
branch nick: emacs-23
timestamp: Tue 2011-04-26 14:31:04 -0400
message:
  * src/nsfns.m (Fns_read_file_name): Doc fix (Bug#8534).
modified:
  src/ChangeLog
  src/nsfns.m

=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2011-04-18 08:33:58 +0000
+++ b/src/ChangeLog     2011-04-26 18:31:04 +0000
@@ -1,3 +1,7 @@
+2011-04-26  Chong Yidong  <address@hidden>
+
+       * nsfns.m (Fns_read_file_name): Doc fix (Bug#8534).
+
 2011-04-18  Eli Zaretskii  <address@hidden>
 
        * s/ms-w32.h (localtime): Redirect to sys_localtime.

=== modified file 'src/nsfns.m'
--- a/src/nsfns.m       2011-01-03 21:26:22 +0000
+++ b/src/nsfns.m       2011-04-26 18:31:04 +0000
@@ -1422,10 +1422,11 @@
 DEFUN ("ns-read-file-name", Fns_read_file_name, Sns_read_file_name, 1, 4, 0,
        doc: /* Use a graphical panel to read a file name, using prompt PROMPT.
 Optional arg DIR, if non-nil, supplies a default directory.
-Optional arg ISLOAD, if non-nil, means read a file name for saving.
+Optional arg MUSTMATCH, if non-nil, means the returned file or
+directory must exist.
 Optional arg INIT, if non-nil, provides a default file name to use.  */)
-     (prompt, dir, isLoad, init)
-     Lisp_Object prompt, dir, isLoad, init;
+     (prompt, dir, mustmatch, init)
+     Lisp_Object prompt, dir, mustmatch, init;
 {
   static id fileDelegate = nil;
   int ret;
@@ -1450,7 +1451,7 @@
   if ([dirS characterAtIndex: 0] == '~')
     dirS = [dirS stringByExpandingTildeInPath];
 
-  panel = NILP (isLoad) ?
+  panel = NILP (mustmatch) ?
     (id)[EmacsSavePanel savePanel] : (id)[EmacsOpenPanel openPanel];
 
   [panel setTitle: promptS];
@@ -1464,7 +1465,7 @@
 
   panelOK = 0;
   BLOCK_INPUT;
-  if (NILP (isLoad))
+  if (NILP (mustmatch))
     {
       ret = [panel runModalForDirectory: dirS file: initS];
     }