r2735 - in people/goneri/SvnBuildStat-WWW: lib/SvnBuildStat/WWW/Controller root/src/packages

[Gonéri Le Bouder]

Author: goneri-guest
Date: 2007-05-28 00:09:51 +0000 (Mon, 28 May 2007)
New Revision: 2735

Modified:
   people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/.Packages.pm.swp
   people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/Packages.pm
   people/goneri/SvnBuildStat-WWW/root/src/packages/.main.tt2.swp
   people/goneri/SvnBuildStat-WWW/root/src/packages/info.tt2
Log:
print a warning is the package is outdated and improve some stuffs


Modified: people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/.Packages.pm.swp
===================================================================
(Binary files differ)

Modified: people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/Packages.pm
===================================================================
--- people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/Packages.pm	2007-05-27 23:49:47 UTC (rev 2734)
+++ people/goneri/SvnBuildStat-WWW/lib/SvnBuildStat/WWW/Controller/Packages.pm	2007-05-28 00:09:51 UTC (rev 2735)
@@ -70,7 +70,6 @@
     return;
   }
 
-
   $c->stash->{template} = 'packages/main.tt2';
 
 }
@@ -89,9 +88,13 @@
   $c->stash->{bugpic} = $package->name;
   $c->stash->{bugpic} =~ s!^(.)(.+)$!http://people.debian.org/~glandium/bts/$1/$1$2.png! ;
   $c->stash->{istarballpresent} = $package->istarballpresent;
-  $c->stash->{isindebian} = $package->isindebian,
-  $c->stash->{tarballuri} = $package->tarballuri,
-  $c->stash->{uri} = $package->uri,
+  $c->stash->{isindebian} = $package->isindebian;
+  $c->stash->{tarballuri} = $package->tarballuri;
+  $c->stash->{uri} = $package->uri;
+  $c->stash->{weburi} = $package->uri;
+  $c->stash->{weburi} =~ s!svn://svn.debian.org/svn!http://svn.debian.org/wsvn!;
+  $c->stash->{isuptodate} = $package->isuptodate;
+  $c->stash->{upstreamrelease} = $package->upstreamrelease;
   ############ Maintainers list
   my $packagemaintainer_rs = $c->model('SvnBuildStat::WWW::Model::DB::PackageMaintainer')->search({package_id => $package->id});
   $c->stash->{maintainers} = [ $packagemaintainer_rs->search_related("maintainer_id")->all ];
@@ -178,7 +181,7 @@
 
   my $archobj = $c->model('SvnBuildStat::WWW::Model::DB::Arch')->find_or_create ({name => $arch});
 
-  $package_rs = $c->model('SvnBuildStat::WWW::Model::DB::Viewpackage')->search({istarballpresent => 'true'},{order_by=>"builded"});
+  my $package_rs = $c->model('SvnBuildStat::WWW::Model::DB::Viewpackage')->search({istarballpresent => 'true'},{order_by=>"builded"});
 
 
   my $resp = '';

Modified: people/goneri/SvnBuildStat-WWW/root/src/packages/.main.tt2.swp
===================================================================
(Binary files differ)

Modified: people/goneri/SvnBuildStat-WWW/root/src/packages/info.tt2
===================================================================
--- people/goneri/SvnBuildStat-WWW/root/src/packages/info.tt2	2007-05-27 23:49:47 UTC (rev 2734)
+++ people/goneri/SvnBuildStat-WWW/root/src/packages/info.tt2	2007-05-28 00:09:51 UTC (rev 2735)
@@ -8,7 +8,7 @@
   [% FOREACH maintainer IN maintainers -%]
   <tr>
     <td>
-      <a href="http://qa.debian.org/developer.php?login=[% maintainer.email %]">[% maintainer.name %]</a>
+      <strong>[% maintainer.name %]</strong> <a href="http://qa.debian.org/developer.php?login=[% maintainer.email %]">QA</a> <a href="[% Catalyst.uri_for('/packages/list/') _ maintainer.email %]">Packages</a>
     </td>
   </tr>
   [% END -%]
@@ -17,15 +17,20 @@
 <h2>URI</h2>
 <table>
 <tr>
-  <td><a href="[% uri %]">Repository</a></td>
+  <td>Repository location: <a href="[% uri %]">SVN</a> <a href="[% weburi %]">HTTP</a></td>
 </tr>
-<tr [% IF ! istarballpresent %]class="error"[% END %]>
+<tr>
+<td [% IF ! istarballpresent %]class="error"[% END %]>
   [% IF istarballpresent %]
   <a href="[% tarballuri %]">Tarball</a>
   [% ELSE %]
   Can't find the tarball
   [% END %]
+  </td>
 </tr>
+[% IF ! isuptodate %]
+<tr><td class="error">A new upstream ([% upstreamrelease %]) release exists.</a></td></tr>
+[% END %]
 </table>
 
 [% IF isindebian %]