diff options
Diffstat (limited to 'script/bookmarks_test.pl')
-rwxr-xr-x | script/bookmarks_test.pl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/script/bookmarks_test.pl b/script/bookmarks_test.pl index d692744..20305c4 100755 --- a/script/bookmarks_test.pl +++ b/script/bookmarks_test.pl @@ -1,13 +1,11 @@ #!/usr/bin/perl -w -BEGIN { $ENV{CATALYST_ENGINE} ||= 'Test' } - use strict; use Getopt::Long; use Pod::Usage; use FindBin; use lib "$FindBin::Bin/../lib"; -use Bookmarks; +use Catalyst::Test 'Bookmarks'; my $help = 0; @@ -15,7 +13,7 @@ GetOptions( 'help|?' => \$help ); pod2usage(1) if ( $help || !$ARGV[0] ); -print Bookmarks->run($ARGV[0])->content . "\n"; +print request($ARGV[0])->content . "\n"; 1; |