summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--lib/jitterbug/Project.pm11
-rw-r--r--lib/jitterbug/WebService.pm17
2 files changed, 21 insertions, 7 deletions
diff --git a/lib/jitterbug/Project.pm b/lib/jitterbug/Project.pm
index b330635..be62921 100644
--- a/lib/jitterbug/Project.pm
+++ b/lib/jitterbug/Project.pm
@@ -2,6 +2,7 @@ package jitterbug::Project;
use Dancer ':syntax';
use jitterbug::Plugin::Redis;
+use jitterbug::Plugin::Template;
use DateTime;
use XML::Feed;
@@ -42,9 +43,15 @@ get '/:project/feed' => sub {
foreach my $version (keys %{$desc->{version}}) {
my $entry = XML::Feed::Entry->new();
- $entry->title("build for ".$desc->{commit}.' on '.$version);
- $entry->summary("Result: ".$desc->{version}->{$version});
+ $entry->link( request->base
+ . 'api/build/'
+ . $project . '/'
+ . $desc->{commit} . '/'
+ .$version );
+ $entry->title( "build for " . $desc->{commit} . ' on ' . $version );
+ $entry->summary( "Result: " . $desc->{version}->{$version} );
$feed->add_entry($entry);
+
}
}
diff --git a/lib/jitterbug/WebService.pm b/lib/jitterbug/WebService.pm
index 62f55c0..c8be8fd 100644
--- a/lib/jitterbug/WebService.pm
+++ b/lib/jitterbug/WebService.pm
@@ -21,11 +21,18 @@ get '/build/:project/:commit/:version' => sub {
open my $fh, '<', $file;
my @content = <$fh>;
close $fh;
- {
- commit => $commit,
- version => $version,
- content => join( '', @content ),
- };
+
+ if ( request->accept =~ m!application/json! ) {
+ return {
+ commit => $commit,
+ version => $version,
+ content => join( '', @content ),
+ };
+ }
+ else {
+ content_type 'text/plain';
+ return join( '', @content );
+ }
}
};