X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FApp%2FWeb%2FOof.pm;h=61c4ecf166cb58d391f590b389673139e11e3f65;hb=5d7b540020126786a2e5eb26680a3144f87db7f0;hp=1f937fe182a6c1c4f0d13f569bd603562392df52;hpb=1576fc41a34d75269ba8408db99104855edbba11;p=app-web-oof.git

diff --git a/lib/App/Web/Oof.pm b/lib/App/Web/Oof.pm
index 1f937fe..61c4ecf 100644
--- a/lib/App/Web/Oof.pm
+++ b/lib/App/Web/Oof.pm
@@ -6,7 +6,7 @@ use warnings;
 use utf8;
 use parent qw/Plack::Component/;
 
-our $VERSION = '0.000_001';
+our $VERSION = '0.000_002';
 
 use DBIx::Simple;
 use File::Slurp;
@@ -205,7 +205,7 @@ sub details_app {
 	my $title = $db{$$}->select(products => 'title', {product => $id})->list;
 	my @pics = <static/fullpics/$id-*>;
 	my $slug = make_slug $title;
-	$tree->find('title')->replace_content("Pictures of $title");
+	$tree->find('title')->replace_content("Pictures of $title | ledparts4you");
 	$tree->find('h2')->replace_content($title);
 	$tree->look_down(rel => 'canonical')->attr(href => "/details/$id/$slug");
 	$tree->fid('pictures')->iter3(\@pics, \&details_list_element);
@@ -231,7 +231,7 @@ sub app {
 			my $app = shift;
 			sub {
 				my $res = $app->(@_);
-				push @{$res->[2]}, $footer;
+				push @{$res->[2]}, $footer if $res->[0] == 200;
 				$res;
 			}
 		};
@@ -258,8 +258,10 @@ App::Web::Oof - Oversimplified order form / ecommerce website
 =head1 DESCRIPTION
 
 Oof (Oversimplified order form) is a very simple ecommerce website.
-As of this moment it is incomplete (although functional), hence the
-version number.
+It is the code behind L<https://ledparts4you.uk.to>.
+
+This version is reasonably functional, yet not very reusable, hence
+the version number.
 
 =head1 AUTHOR