Fixed the accessibility hierarchy of the message view to allow the accessibility...
[adiumx.git] / Source / PTHotKey.m
blob3dcd0d1903d6a38d5705ad66754b70b0860c59c0
1 //
2 //  PTHotKey.m
3 //  Protein
4 //
5 //  Created by Quentin Carnicelli on Sat Aug 02 2003.
6 //  Copyright (c) 2003 Quentin D. Carnicelli. All rights reserved.
7 //
9 #import "PTHotKey.h"
11 #import "PTHotKeyCenter.h"
12 #import "PTKeyCombo.h"
14 @implementation PTHotKey
16 - (id)init
18         return [self initWithIdentifier: nil keyCombo: nil];
22 - (id)initWithIdentifier: (id)identifier keyCombo: (PTKeyCombo*)combo
24         self = [super init];
25         
26         if( self )
27         {
28                 [self setIdentifier: identifier];
29                 [self setKeyCombo: combo];
30         }
31         
32         return self;
35 - (void)dealloc
37         [mIdentifier release];
38         [mName release];
39         [mKeyCombo release];
40         
41         [super dealloc];
44 - (NSString*)description
46         return [NSString stringWithFormat: @"<%@: %@, %@>", NSStringFromClass( [self class] ), [self identifier], [self keyCombo]];
49 #pragma mark -
51 - (void)setIdentifier: (id)ident
53         [ident retain];
54         [mIdentifier release];
55         mIdentifier = ident;
58 - (id)identifier
60         return mIdentifier;
63 - (void)setKeyCombo: (PTKeyCombo*)combo
65         if( combo == nil )
66                 combo = [PTKeyCombo clearKeyCombo];     
68         [combo retain];
69         [mKeyCombo release];
70         mKeyCombo = combo;
73 - (PTKeyCombo*)keyCombo
75         return mKeyCombo;
78 - (void)setName: (NSString*)name
80         [name retain];
81         [mName release];
82         mName = name;
85 - (NSString*)name
87         return mName;
90 - (void)setTarget: (id)target
92         mTarget = target;
95 - (id)target
97         return mTarget;
100 - (void)setAction: (SEL)action
102         mAction = action;
105 - (SEL)action
107         return mAction;
110 - (void)invoke
112         [mTarget performSelector: mAction withObject: self];
115 @end