Remove EmacsOpenPanel and EmacsSavePanel (bug#38031)
This commit is contained in:
parent
a0336029db
commit
0bed550e21
2 changed files with 1 additions and 40 deletions
25
src/nsfns.m
25
src/nsfns.m
|
@ -1622,7 +1622,7 @@ Frames are listed from topmost (first) to bottommost (last). */)
|
|||
dirS = [dirS stringByExpandingTildeInPath];
|
||||
|
||||
panel = isSave ?
|
||||
(id)[EmacsSavePanel savePanel] : (id)[EmacsOpenPanel openPanel];
|
||||
(id)[NSSavePanel savePanel] : (id)[NSOpenPanel openPanel];
|
||||
|
||||
[panel setTitle: promptS];
|
||||
|
||||
|
@ -3077,29 +3077,6 @@ The position is returned as a cons cell (X . Y) of the
|
|||
return ret;
|
||||
}
|
||||
|
||||
@implementation EmacsSavePanel
|
||||
- (BOOL)performKeyEquivalent:(NSEvent *)theEvent
|
||||
{
|
||||
BOOL ret = handlePanelKeys (self, theEvent);
|
||||
if (! ret)
|
||||
ret = [super performKeyEquivalent:theEvent];
|
||||
return ret;
|
||||
}
|
||||
@end
|
||||
|
||||
|
||||
@implementation EmacsOpenPanel
|
||||
- (BOOL)performKeyEquivalent:(NSEvent *)theEvent
|
||||
{
|
||||
// NSOpenPanel inherits NSSavePanel, so passing self is OK.
|
||||
BOOL ret = handlePanelKeys (self, theEvent);
|
||||
if (! ret)
|
||||
ret = [super performKeyEquivalent:theEvent];
|
||||
return ret;
|
||||
}
|
||||
@end
|
||||
|
||||
|
||||
@implementation EmacsFileDelegate
|
||||
/* --------------------------------------------------------------------------
|
||||
Delegate methods for Open/Save panels
|
||||
|
|
16
src/nsterm.h
16
src/nsterm.h
|
@ -595,22 +595,6 @@ typedef id instancetype;
|
|||
@end
|
||||
|
||||
|
||||
/* ==========================================================================
|
||||
|
||||
File open/save panels
|
||||
This and next override methods to handle keyboard input in panels.
|
||||
|
||||
========================================================================== */
|
||||
|
||||
@interface EmacsSavePanel : NSSavePanel
|
||||
{
|
||||
}
|
||||
@end
|
||||
@interface EmacsOpenPanel : NSOpenPanel
|
||||
{
|
||||
}
|
||||
@end
|
||||
|
||||
@interface EmacsFileDelegate : NSObject
|
||||
{
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue