aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/nsfns.m8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/nsfns.m b/src/nsfns.m
index 1750eb62cdf..fac61d2ab53 100644
--- a/src/nsfns.m
+++ b/src/nsfns.m
@@ -1503,12 +1503,12 @@ Optional arg DIR_ONLY_P, if non-nil, means choose only directories. */)
1503 [panel setDelegate: fileDelegate]; 1503 [panel setDelegate: fileDelegate];
1504 1504
1505 panelOK = 0; 1505 panelOK = 0;
1506 if (! NILP (dir_only_p)) 1506 if (! NILP (dir_only_p))
1507 { 1507 {
1508 [panel setCanChooseDirectories: YES]; 1508 [panel setCanChooseDirectories: YES];
1509 [panel setCanChooseFiles: NO]; 1509 [panel setCanChooseFiles: NO];
1510 } 1510 }
1511 1511
1512 block_input (); 1512 block_input ();
1513#if defined (NS_IMPL_COCOA) && \ 1513#if defined (NS_IMPL_COCOA) && \
1514 MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_6 1514 MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_6
@@ -1519,7 +1519,7 @@ Optional arg DIR_ONLY_P, if non-nil, means choose only directories. */)
1519 [panel setNameFieldStringValue: [initS lastPathComponent]]; 1519 [panel setNameFieldStringValue: [initS lastPathComponent]];
1520 else 1520 else
1521 [panel setNameFieldStringValue: @""]; 1521 [panel setNameFieldStringValue: @""];
1522 1522
1523 ret = [panel runModal]; 1523 ret = [panel runModal];
1524#else 1524#else
1525 if (NILP (mustmatch) && NILP (dir_only_p)) 1525 if (NILP (mustmatch) && NILP (dir_only_p))
@@ -2147,7 +2147,7 @@ In case the execution fails, an error is signaled. */)
2147 [NSApp postEvent: nxev atStart: NO]; 2147 [NSApp postEvent: nxev atStart: NO];
2148 2148
2149 // If there are other events, the event loop may exit. Keep running 2149 // If there are other events, the event loop may exit. Keep running
2150 // until the script has been handeled. */ 2150 // until the script has been handled. */
2151 while (! NILP (as_script)) 2151 while (! NILP (as_script))
2152 [NSApp run]; 2152 [NSApp run];
2153 2153