From b377b6f5611abec4cf08f7ec286091c6b73d1fbd Mon Sep 17 00:00:00 2001 From: Ralf Ertzinger Date: Tue, 14 Feb 2012 21:39:47 +0100 Subject: [PATCH] Vimeo: Add self test information --- videosite/VimeoGrabber.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/videosite/VimeoGrabber.pm b/videosite/VimeoGrabber.pm index 89d3158..6b1dd60 100644 --- a/videosite/VimeoGrabber.pm +++ b/videosite/VimeoGrabber.pm @@ -19,6 +19,8 @@ sub new { my $self = $class->SUPER::new(); $self->{'NAME'} = 'vimeo'; + $self->{_SELFTESTURL} = 'http://vimeo.com/35055590'; + $self->{_SELFTESTTITLE} = 'Hello'; $self->{'PATTERNS'} = ['(http://(?:[-a-zA-Z0-9_.]+\.)*vimeo.com/(\d+))']; bless($self, $class); -- 1.8.3.1