view release on metacpan or  search on metacpan

lib/Java/JCR/Node.pm  view on Meta::CPAN

516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
sub is_modified {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->isModified(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub update {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->update(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub add_mixin {

lib/Java/JCR/Version/Version.pm  view on Meta::CPAN

547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
sub is_modified {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->isModified(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub update {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->update(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub add_mixin {

lib/Java/JCR/Version/VersionHistory.pm  view on Meta::CPAN

607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
sub is_modified {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->isModified(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub update {
    my $self = shift;
    my @args = Java::JCR::Base::_process_args(@_);
 
    my $result = eval { $self->{obj}->update(@args) };
    if ($@) { my $e = Java::JCR::Exception->new($@); croak $e }
 
    return $result;
}
 
sub add_mixin {