[Pkg-ocaml-maint-commits] r6269 - /trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll

[dogguy-guest at users.alioth.debian.org]

Author: dogguy-guest
Date: Thu Feb 26 21:49:58 2009
New Revision: 6269

URL: http://svn.debian.org/wsvn/?sc=1&rev=6269
Log:
Add a link on version number to changelog file

Modified:
    trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll

Modified: trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll
URL: http://svn.debian.org/wsvn/trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll?rev=6269&op=diff
==============================================================================
--- trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll (original)
+++ trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll Thu Feb 26 21:49:58 2009
@@ -223,7 +223,12 @@
          (td ~a:[a_class [(string_of_status (source_status status))^" src"]; a_id pkg]
             [a ~a:[a_href (uri_of_string ("http://packages.qa.debian.org/"^pkg))] [pcdata pkg];
              br ();
-             small [pcdata (sprintf "(%s)" ((M.find pkg sources_map).sversion))];
+             small [
+               pcdata "(";
+               a ~a:[a_href (uri_of_string ("http://packages.debian.org/changelogs/pool/main/"^(String.sub pkg 0 1)^"/"^pkg^"/current/changelog"))]
+                 [pcdata (sprintf "%s" ((M.find pkg sources_map).sversion))];
+               pcdata ")";
+             ];
              br ();
              small [pcdata "[";
                     a ~a:[a_href (uri_of_string ("http://buildd.debian.org/~luk/status/package.php?p="^pkg))]