package Skype::Any::Object::SMS;
use strict;
use warnings;
use parent qw/Skype::Any::Object/;

sub property { shift->SUPER::property('SMS', @_) }
sub alter    { shift->SUPER::alter('SMS', @_) }

__PACKAGE__->_mk_bool_property(qw/is_failed_unseen/);

1;
__END__

=head1 NAME

Skype::Any::Object::SMS - SMS object for Skype::Any

=head1 SYNOPSIS

  use Skype::Any;

  my $skype = Skype::Any->new;
  my $sms = $skype->sms($id);

=head1 METHODS

=over 4

=item C<< $sms->property($property[, $value]) >>

=over 4

=item body

=item type

=item status

=item failurereason

=item is_failed_unseen

=item timestamp

=item price

=item price_precision

=item price_currency

=item reply_to_number

=item target_numbers

=item target_statuses

=back

=item C<< $sms->alter($action[, $value]) >>

=back

=cut