base the export shell script default name on the machine name.

This commit is contained in:
Kelvin Sherlock 2021-03-08 21:15:15 -05:00
parent dc7adde938
commit 9626a6588f
1 changed files with 4 additions and 1 deletions

View File

@ -425,9 +425,12 @@ static NSString *ShellQuote(NSString *s) {
-(IBAction)exportShellScript: (id)sender {
NSSavePanel *p = [NSSavePanel savePanel];
NSString *defaultName = [_mameMachine stringByAppendingString: @".sh"];
[p setTitle: @"Export Shell Script"];
[p setExtensionHidden: NO];
[p setNameFieldStringValue: @"mame.sh"];
[p setNameFieldStringValue: defaultName];
//[p setDelegate: self];