[CVS] 修改CVS Utilities的一个小BUG：cvschroot

最新推荐文章于 2022-01-24 16:56:11 发布

原创最新推荐文章于 2022-01-24 16:56:11 发布 · 993 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#cvs #服务器 #工作

程序人生专栏收录该内容

26 篇文章

订阅专栏

博客介绍了CVS Utilities相关内容，提到合法的CVSROOT可带端口号，一台机器启动多个仓库常采用此方法。作者使用cvschroot程序变更项目的CVSROOT时，遇到程序不认识输入的CVSROOT问题，并对程序代码进行了修改。

CVS Utilities: http://www.red-bean.com/cvsutils/
    修改一个bug
      一个合法的CVSROOT可以是:psrver:myhan@192.168.10.20:2404/home/cvsroot
      这里的cvs服务器地址后面是可以带上端口号的。
      如果一台机器上同时启动多个仓库，常常采用这种方法。
      为了方便，我使用CVS Utilities提供的cvschroot程序来变更我当前工作中的项目的CVSROOT,
      但是出现输入的CVSROOT它不认识的问题，所以做了如下的修改：

--- cvschroot.orig      2004-08-12 17:10:11.000000000 +0800
+++ cvschroot   2004-08-12 16:49:58.000000000 +0800
@@ -76,7 +76,7 @@
 sub split_root ($)
 {
        my $res;
-       if ( shift(@_) =~ m{^([^ ]+:)?(/[^:@ ]+)$} ) {
+       if ( shift(@_) =~ m{^([^ ]+:[/d]*)?(/[^:@ ]+)$} ) {
                $res = $2;
        } else {
                error shift(@_) . " not recognized";