mirror of
https://github.com/gnustep/apps-projectcenter.git
synced 2025-02-19 01:51:09 +00:00
the principal class can now be set using the GUI
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/projectcenter/trunk@8594 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
parent
5249caa6a2
commit
374cd11896
2 changed files with 23 additions and 3 deletions
|
@ -64,5 +64,7 @@
|
|||
|
||||
- (void)updateValuesFromProjectDict;
|
||||
|
||||
- (void)setPrincipalClass:(id)sender;
|
||||
|
||||
@end
|
||||
|
||||
|
|
|
@ -52,15 +52,19 @@
|
|||
[textField setBezeled: NO];
|
||||
[textField setDrawsBackground: NO];
|
||||
[textField setStringValue:@"Principal class:"];
|
||||
[projectProjectInspectorView addSubview:[textField autorelease]];
|
||||
[projectProjectInspectorView addSubview:textField];
|
||||
RELEASE(textField);
|
||||
|
||||
principalClassField =[[NSTextField alloc] initWithFrame:NSMakeRect(106,240,144,21)];
|
||||
frame = NSMakeRect(106,240,144,21);
|
||||
principalClassField =[[NSTextField alloc] initWithFrame:frame];
|
||||
[principalClassField setAlignment: NSLeftTextAlignment];
|
||||
[principalClassField setBordered: YES];
|
||||
[principalClassField setEditable: YES];
|
||||
[principalClassField setBezeled: YES];
|
||||
[principalClassField setDrawsBackground: YES];
|
||||
[principalClassField setStringValue:@""];
|
||||
[principalClassField setTarget:self];
|
||||
[principalClassField setAction:@selector(setPrincipalClass:)];
|
||||
[projectProjectInspectorView addSubview:principalClassField];
|
||||
}
|
||||
|
||||
|
@ -162,9 +166,23 @@
|
|||
|
||||
- (void)updateValuesFromProjectDict
|
||||
{
|
||||
NSString *pc;
|
||||
|
||||
[super updateValuesFromProjectDict];
|
||||
|
||||
[principalClassField setStringValue:[projectDict objectForKey:PCPrincipalClass]];
|
||||
pc = [projectDict objectForKey:PCPrincipalClass];
|
||||
[principalClassField setStringValue:pc];
|
||||
}
|
||||
|
||||
- (void)setPrincipalClass:(id)sender
|
||||
{
|
||||
[projectDict setObject:[principalClassField stringValue]
|
||||
forKey:PCPrincipalClass];
|
||||
|
||||
[self writeMakefile];
|
||||
}
|
||||
|
||||
@end
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in a new issue