Re: CamelBones question
Re: CamelBones question
- Subject: Re: CamelBones question
- From: Pierre Vaudrey <email@hidden>
- Date: Wed, 12 May 2004 16:54:51 +0200
Le mercredi, 12 mai 2004, ` 14:51 Europe/Paris, Sherm Pendley a icrit :
>
The above assumes that $self->{'records'} is an object reference
I'm trying :
sub removeCommentAction
{
my ($self, $sender) = @_;
my $index = $self->{'Table'}->selectedRow;
NSBeep();
if ( NSAlertDefaultReturn == NSRunAlertPanel("Warning!", "Are you
sure...?", "OK", "Cancel", undef) ) {
$self->{'comments'}->removeObjectAtIndex($index);
$self->{'Table'}->reloadData();
$self->saveData();
}
}
which works without the NSRunAlertPanel condition and with it raise the
following error :
Perl error: Arg 1 isn't an NSString at
/Users/pierreva/Documents/perlGedcom/Comments/build/Comments.app/
Contents/Resources/CommentsWindowController.pm
Could you please help me to solve it and I'll play with the different
solutions you propose.
Thank for your help !
Pierre
_______________________________________________
cocoa-dev mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/cocoa-dev
Do not post admin requests to the list. They will be ignored.