From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 19 Aug 2022 13:37:35 +0000 (+0200)
Subject: Fix underscores in argument names in ns-win
X-Git-Tag: emacs-29.0.90~1447^2~42
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=962cb44eea43a0e5591788a218813ac3a8e57181;p=emacs.git

Fix underscores in argument names in ns-win

* lisp/term/ns-win.el (x-file-dialog): Don't use underscores in
argument names.
---

diff --git a/lisp/term/ns-win.el b/lisp/term/ns-win.el
index 56aca2bd83e..82b6281eb69 100644
--- a/lisp/term/ns-win.el
+++ b/lisp/term/ns-win.el
@@ -435,14 +435,14 @@ Lines are highlighted according to `ns-input-line'."
 ;; nsterm.m
 
 (declare-function ns-read-file-name "nsfns.m"
-		  (prompt &optional dir mustmatch init dir_only_p))
+		  (prompt &optional dir mustmatch init dir-only-p))
 
 ;;;; File handling.
 
-(defun x-file-dialog (prompt dir &optional default_filename
-                             mustmatch only_dir_p)
+(defun x-file-dialog (prompt dir &optional default-filename
+                             mustmatch only-dir-p)
   "SKIP: real doc in xfns.c."
-  (ns-read-file-name prompt dir mustmatch default_filename only_dir_p))
+  (ns-read-file-name prompt dir mustmatch default-filename only-dir-p))
 
 (defun ns-open-file-using-panel ()
   "Pop up open-file panel, and load the result in a buffer."