This is InfoPanel.m in view mode; [Download] [Up]
#import "InfoPanel.h"
#import "MailSpeaker.h"
#import "version.h"
#import <appkit/appkit.h>
@implementation InfoPanel
- awakeFromNib
{
[versionText setStringValue: version];
[maintainerText setStringValue: maintainer];
return self;
}
- sendComments: sender;
{
char subject[80];
port_t port;
port = NXPortFromName("Mail", NULL);
if(!port)
return nil;
port_deallocate(task_self(),port);
port = NXPortFromName("MailSendDemo", NULL);
sprintf(subject,"Re: %s %s", [NXApp appName], version);
if (port != PORT_NULL)
{
MailSpeaker *mail = [[MailSpeaker alloc] init];
int winNum;
[mail setSendPort: port];
[mail openSend: &winNum];
[mail setTo: maintainer inWindow: winNum];
[mail setSubject: subject inWindow: winNum];
[mail free];
port_deallocate(task_self(),port);
}
return self;
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.