aboutsummaryrefslogtreecommitdiffstats
path: root/lib/WWW/StrawViewer/CommentThreads.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/WWW/StrawViewer/CommentThreads.pm')
-rw-r--r--lib/WWW/StrawViewer/CommentThreads.pm13
1 files changed, 4 insertions, 9 deletions
diff --git a/lib/WWW/StrawViewer/CommentThreads.pm b/lib/WWW/StrawViewer/CommentThreads.pm
index 499d930..1eba143 100644
--- a/lib/WWW/StrawViewer/CommentThreads.pm
+++ b/lib/WWW/StrawViewer/CommentThreads.pm
@@ -36,15 +36,10 @@ Retrieve comments from a video ID.
sub comments_from_video_id {
my ($self, $video_id) = @_;
- return
- $self->_get_results(
- $self->_make_commentThreads_url(
- videoId => $video_id,
- textFormat => 'plainText',
- order => $self->get_comments_order,
- part => 'snippet,replies'
- ),
- simple => 1,
+ $self->_get_results(
+ $self->_make_feed_url("comments/$video_id",
+ sort_by => $self->get_comments_order,
+ ),
);
}