This is SelectableText.m in view mode; [Download] [Up]
#import "SelectableText.h"
#import "Controller.h"
#import <appkit/Application.h>
@implementation SelectableText
- becomeFirstResponder
{
register id v;
v=[super becomeFirstResponder];
if (v) [[NXApp delegate] perform:@selector(reflectEditable:)
with:(id)(int)[self isEditable] afterDelay:1 cancelPrevious:NO];
return v;
}
@end
// "Kids, don't try this at home!"
@interface Responder(initialize)
+ initialize;
@end
@implementation Responder(initialize)
+ initialize
{
if (self==[Responder class]) [SelectableText poseAs:[Text class]];
return self;
}
@end
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.