Changeset 2349 in ProjectBuilder for devel/pb-modules/lib/ProjectBuilder/VCS.pm

Timestamp:

Jan 14, 2019, 5:07:22 PM (5 years ago)

Author:

Bruno Cornec

Message:

Fix #174 by adding the conf param pbgitremote with its doc

File:

• devel/pb-modules/lib/ProjectBuilder/VCS.pm (modified) (1 diff)

devel/pb-modules/lib/ProjectBuilder/VCS.pm

@@ -421 +421 @@
             chdir($cwd) || return("");
         }
+        my ($pborigin) = pb_conf_get("pbgitremote");
         while (<GIT>) {
-            next unless (/^origin\s+(\S+) \(push\)$/);
-            return $1;
+            next unless (/^$pborigin->{$ENV{'PBPROJ'}}\s+(\S+) \(push\)$/);
+            $res = $1;
+            if (($res =~ /@/) && ($res !~ /:\/\//)) {
+                # we have an ssh connection, return it
+                $res = "ssh://$res";
+            }
+            return $res;
         }
         close(GIT);
-        warn "Unable to find a remote git origin under $dir nor $ENV{'PBPROJDIR'}";
+        warn "Unable to find a remote git $pborigin->{$ENV{'PBPROJ'}} under $dir nor $ENV{'PBPROJDIR'}";
         return "";
     }