Output project URLs as hyperlinks instead of plaintext.

[gitweb-sgk] / gitweb.cgi

diff --git a/gitweb.cgi b/gitweb.cgi
index 16021cc..57b60c4 100755 (executable)
--- a/gitweb.cgi
+++ b/gitweb.cgi
@@ -4070,10 +4070,11 @@ sub print_nav_breadcrumbs_path {
        while (my $part = shift) {
                $dirprefix .= "/" if defined $dirprefix;
                $dirprefix .= $part;
        while (my $part = shift) {
                $dirprefix .= "/" if defined $dirprefix;
                $dirprefix .= $part;

-               print $cgi->a({-href => href(project => undef,
-                                            project_filter => $dirprefix,
-                                            action => "project_list")},
-                             esc_html($part)) . " / ";
+               if (scalar @_ != 0) {
+                       print $cgi->a({-href => href(action => "summary")}, esc_html($part)) . " / ";
+               } else {
+                       print $cgi->a({-href => href(action => "summary")}, esc_html($part));
+               }

        }
 }
 
        }
 }
 


@@ -4087,7 +4088,9 @@ sub print_nav_breadcrumbs {
                my @dirname = split '/', $project;
                my $projectbasename = pop @dirname;
                print_nav_breadcrumbs_path(@dirname);
                my @dirname = split '/', $project;
                my $projectbasename = pop @dirname;
                print_nav_breadcrumbs_path(@dirname);

-               print $cgi->a({-href => href(action=>"summary")}, esc_html($projectbasename));
+               if ($projectbasename != ".git") {
+                       print $cgi->a({-href => href(action=>"summary")}, esc_html($projectbasename));
+               }

                if (defined $action) {
                        my $action_print = $action ;
                        if (defined $opts{-action_extra}) {
                if (defined $action) {
                        my $action_print = $action ;
                        if (defined $opts{-action_extra}) {


@@ -4434,7 +4437,7 @@ sub git_print_header_div {
 
 sub format_repo_url {
        my ($name, $url) = @_;
 
 sub format_repo_url {
        my ($name, $url) = @_;

-       return "<tr class=\"metadata_url\"><td>$name</td><td>$url</td></tr>\n";
+       return "<tr class=\"metadata_url\"><td>$name</td><td><a href=\"$url\">$url</a></td></tr>\n";

 }
 
 # Group output by placing it in a DIV element and adding a header.
 }
 
 # Group output by placing it in a DIV element and adding a header.


@@ -6573,7 +6576,7 @@ sub git_summary {
 
        # use per project git URL list in $projectroot/$project/cloneurl
        # or make project git URL from git base URL and project name
 
        # use per project git URL list in $projectroot/$project/cloneurl
        # or make project git URL from git base URL and project name

-       my $url_tag = "URL";
+       my $url_tag = "clone URL";

        my @url_list = git_get_project_url_list($project);
        @url_list = map { "$_/$project" } @git_base_url_list unless @url_list;
        foreach my $git_url (@url_list) {
        my @url_list = git_get_project_url_list($project);
        @url_list = map { "$_/$project" } @git_base_url_list unless @url_list;
        foreach my $git_url (@url_list) {