X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/8e92468eae9ac0ab8161a0c71ff6c6a0a8aef07a..8a5084bc62d8f59320efc43fcd5e36bcc668374d:/gitremotes diff --git a/gitremotes b/gitremotes index 7b9484dd1..f596c650f 100755 --- a/gitremotes +++ b/gitremotes @@ -1,12 +1,11 @@ #!/usr/bin/perl # Parses list of remotes in doc/git.mdwn, configures git to use them -# all, and fetches updates from them. - -my $error=0; +# all. After running this, use "git remote update --prune" to pull +# updates from all remotes. open (IN, "doc/git.mdwn") || die "doc/git.mdwn: $!"; while () { - if (/^\*\s+\[?\[?(\w+)\]?\]?\s+`([^>]+)`/) { + if (/^\*\s+\[?\[?(\w+)(?:\|\w+)?\]?\]?\s+`([^>]+)`/) { # note that the remote name has to be a simple word (\w) # for security/sanity reasons my $remote=$1; @@ -17,13 +16,8 @@ while () { my ($oldurl)=$info=~/URL: (.*)/m; if ($oldurl ne $url) { system("git remote rm $remote 2>/dev/null"); - $error |= system("git", "remote", "add", "-f", $remote, $url); - } - else { - $error |= system("git", "fetch", $remote); + system("git", "remote", "add", "-f", $remote, $url) } } } close IN; - -exit $error;