[Gforge-commits] gforge-plugin-scmcvs/include CVSPlugin.class, 1.3, 1.4

[cbayle]

Update of /cvsroot/gforge/gforge-plugin-scmcvs/include
In directory db.perdue.net:/tmp/cvs-serv31445/include

Modified Files:
        CVSPlugin.class 
Log Message:
First part of refactoring work, not yet finished but not working worst than
before, I hope


Index: CVSPlugin.class
===================================================================
RCS file: /cvsroot/gforge/gforge-plugin-scmcvs/include/CVSPlugin.class,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- CVSPlugin.class     16 Jul 2004 12:47:31 -0000      1.3
+++ CVSPlugin.class     21 Jul 2004 22:00:27 -0000      1.4
@@ -189,8 +189,24 @@
                        $add_num=0;
                }
                echo ' (CVS: 
'.$Language->getText('project_home','cvs_commits',array(number_format($commit_num,0),number_format($add_num,0))).")";
+               if ($commit_num || $add_num) {
+                       echo '
+               <br /> &nbsp; -
+                       <a 
href="'.account_group_cvsweb_url($group_id).'">Browse CVS</a>';
+               }
                
        }
+       /**
+        *      account_group_cvsweb_url() - Returns URL for group's CVS 
interface WWW
+        *
+        *      @param  string  The group name
+        *      @return URL to access CVS over HTTP
+        */
+       function account_group_cvsweb_url($group_id) {
+               $project =& group_get_object($group_id);
+               return 
'http://'.$GLOBALS['sys_scm_host'].'/cgi-bin/cvsweb.cgi?cvsroot='.$project->getUnixName();
+       }
+
        function display_groupmenu_scm($params) {
                $group_id = $params['group_id'] ;
                $project =& group_get_object($group_id);