projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Vectorisation-specific imports
[ghc-hetmet.git]
/
darcs-all
diff --git
a/darcs-all
b/darcs-all
index
59e29e1
..
72e1ed3
100644
(file)
--- a/
darcs-all
+++ b/
darcs-all
@@
-14,7
+14,7
@@
my $defaultrepo_lib;
if ($defaultrepo =~ /:/) {
# HTTP or SSH
$defaultrepo_base = $defaultrepo;
if ($defaultrepo =~ /:/) {
# HTTP or SSH
$defaultrepo_base = $defaultrepo;
- $defaultrepo_base =~ s#/ghc$##;
+ $defaultrepo_base =~ s#/[^/]+/?$##;
$defaultrepo_lib = "$defaultrepo_base/packages";
}
elsif ($defaultrepo =~ /^\//) {
$defaultrepo_lib = "$defaultrepo_base/packages";
}
elsif ($defaultrepo =~ /^\//) {
@@
-32,8
+32,6
@@
my $ignore_failure = 0;
# --extra says we grab the extra libs with 'get'. It has no effect on
# the other commands.
my $extra = 0;
# --extra says we grab the extra libs with 'get'. It has no effect on
# the other commands.
my $extra = 0;
-# --complete gets passed onto darcs get
-my $complete = 0;
# --nofib/--testsuite tell get to also grab the respective repos.
# They have no effect on the other commands.
my $nofib = 0;
# --nofib/--testsuite tell get to also grab the respective repos.
# They have no effect on the other commands.
my $nofib = 0;
@@
-92,7
+90,7
@@
sub darcsgetpackage {
sub darcsget {
my $r_flags;
sub darcsget {
my $r_flags;
- if (! $complete && ! grep /(?:--complete|--partial)/, @_) {
+ if (! grep /(?:--complete|--partial)/, @_) {
warning("adding --partial, to override use --complete");
$r_flags = [@_, "--partial"];
}
warning("adding --partial, to override use --complete");
$r_flags = [@_, "--partial"];
}
@@
-131,9
+129,6
@@
sub main {
if ($arg eq "-q") {
$verbose = 0;
}
if ($arg eq "-q") {
$verbose = 0;
}
- elsif ($arg eq "--complete") {
- $complete = 1;
- }
elsif ($arg eq "--extra") {
$extra = 1;
}
elsif ($arg eq "--extra") {
$extra = 1;
}