This is an automated email from the git hooks/post-receive script. jame-guest pushed a commit to tag v0.02 in repository libweasel-perl.
commit 9d2a9bada0e03c3b5e2834bdc2a6a5f9aee7da29 Author: Erik Huelsmann <[email protected]> Date: Thu Jun 16 10:23:07 2016 +0200 * Miscelaneous Element fixes --- lib/Weasel/Element.pm | 11 +++++------ lib/Weasel/Element/Document.pm | 2 +- 2 files changed, 6 insertions(+), 7 deletions(-) diff --git a/lib/Weasel/Element.pm b/lib/Weasel/Element.pm index 3416236..b0ca329 100644 --- a/lib/Weasel/Element.pm +++ b/lib/Weasel/Element.pm @@ -10,7 +10,7 @@ Weasel::Element - The base HTML/Widget element class =head1 SYNOPSIS my $element = $session->page->find("./input[\@name='phone']"); - my $value = $element->send_keys('555-885-321' + my $value = $element->send_keys('555-885-321'); =head1 DESCRIPTION @@ -54,10 +54,9 @@ has _id => (is => 'ro', =cut sub find { - my $self = shift @_; - my @rv = $self->find_all(@_); + my ($self, @args) = @_; - return shift @rv; + return $self->session->find($self, @args); } =item find_all($locator [, $scheme]) @@ -65,10 +64,10 @@ sub find { =cut sub find_all { - my ($self, $locator, $scheme) = @_; + my ($self, @args) = @_; # expand $locator based on framework plugins (e.g. Dojo) - return $self->session->find_all($self, $locator, $scheme); + return $self->session->find_all($self, @args); } =item click() diff --git a/lib/Weasel/Element/Document.pm b/lib/Weasel/Element/Document.pm index 2cae418..97a39f8 100644 --- a/lib/Weasel/Element/Document.pm +++ b/lib/Weasel/Element/Document.pm @@ -32,7 +32,7 @@ extends 'Weasel::Element'; =cut has '+_id' => (required => 0, - default => '//html'); + default => '/html'); =back -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libweasel-perl.git _______________________________________________ Pkg-perl-cvs-commits mailing list [email protected] http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
