Lilypond path selection finally works

This commit is contained in:
Matthias Neeracher 2006-10-29 08:21:25 +00:00
parent a970adcbc9
commit 3e5f12ff3f

View File

@ -121,11 +121,15 @@
appVersion = [self lilypondVersion:appPath]; appVersion = [self lilypondVersion:appPath];
if (!appVersion) if (!appVersion)
appPath = nil; appPath = nil;
else
[appPath retain];
} }
if (toolPath) { if (toolPath) {
toolVersion = [self lilypondVersion:toolPath]; toolVersion = [self lilypondVersion:toolPath];
if (!toolVersion) if (!toolVersion)
toolPath = nil; toolPath = nil;
else
[toolPath retain];
} }
NSMenuItem * toolItem = [lilypondPath itemAtIndex:0]; NSMenuItem * toolItem = [lilypondPath itemAtIndex:0];
@ -168,12 +172,12 @@
{ {
NSUserDefaults* defaults = [NSUserDefaults standardUserDefaults]; NSUserDefaults* defaults = [NSUserDefaults standardUserDefaults];
switch ([sender tag]) { switch ([[sender selectedItem] tag]) {
case 0: case 0:
[defaults setObject:toolPath forKey:@"VLLilypondPath"]; [defaults setObject:toolPath forKey:@"VLLilypondPath"];
break; break;
case 1: case 1:
[defaults setObject:toolPath forKey:@"VLLilypondPath"]; [defaults setObject:appPath forKey:@"VLLilypondPath"];
break; break;
default: default:
break; break;